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1.0 INTRODUCTION 


THE M8203 IS A_ SINGLE=LINE SYNCHRONOUS LINE UNIT MODULE 
WHICH SUPPORTS BOTH CHARACTER “Fie y be (DDCMP, BSC, ETC.) 
AND BIT-ORIENTED (SDiC, HDLC, in PROTOCOLS, AND WHICH IS 
CURRENTLY Fob tat IN THE DMP-11 DDCMP MULTIDROP PROJECT 
THE PURPOSE OF THIS PROGRAM IS TO PERFORM DIAGNOSTIC TESTING 
OF ALL M8203 LOGIC IN A RELATIVELY STATIC MANNER. _ THE 
FOLLOWING FUNCTIONS WILL BE PERFORMED: LINE UNIT REGISTER 
ADDRESSING, USYRT ADDRESSING, STATIC BIT _ INTERACTION AND 
READ/WRITE LOGIC TESTS, BASIC TRANSMITTER AND RECEIVER 
SEQUENCING AND DATA BUFFERING AND STATIC OPERATIONS IN 
CHARACTER AND BIT-STUFFING MODES. IN ADDITION DATA MESSAGES 
WILL BE SENT AT SPEEDS OF 2400 BAUD TO 1 MEGABAUD, WITH 
LOOPBACK IN THE USYRT, ON THE LINE UNIT AT TTL LEVEL, OR 
THROUGH AN EXTERNAL TEST CONNECTOR WITH A SPECIFIC MODEM 
INTERFACE SELECTED. 


THE STATIC LOGIC TESTS WILL PROVIDE EXTENSIVE 
TROUBLESHOOTING CAPABILITIES, SUCH AS _ TIGHT SCOPE LOOPS, 
SWITCH OPTIONS, AND ABILITY TO ‘LOCK'’ ONTO INTERMITTENT 
ERRORS. IN ADDITION TESTS WILL BE DESIGNED AND STRUCTURED 
TO ACHIEVE MAXIMUM FAULT RESOLUTION AND tap tenets 
REPLACEMENT OF THE SMALLEST FIELD REPLACEABLE UNIT 


THIS PROGRAM WILL BE IMPLEMENTED USING THE DIAGNOSTIC 
SUPERVISOR AND A STRUCTURED PROGRAMMING APPROACH. BECAUSE 
THE DESIGN WILL CONFORM TO THE SUPERVISOR (STANDALONE 


VERSION) THE PROGRAM WILL BE COMPATIBLE WITH ACT, APT, XXDP+, 


AND SLIDE. 


THROUGH DIALOGUE WITH THE OPERATOR, THE PROGRAM WILL ALLOW 
MODIFICATION OF DEVICE PARAMETERS, SUCH AS UNIBUS ADDRESS, 
VECTOR ADDRESSES AND DEVICE PRIORITY. IN ADDITION, THE 
OPERATOR CAN SPECIFY PARTICULAR TESTS TO BE RUN AND A 
VARIETY OF LOOPING, RUNNING, AND REPORTING MODES. 


DEVICE ERRORS a BE REPORTED AS THEY OCCUR. THE REPORT 
WILL INCLUDE TEST NUMBER AND DESCRIPTION OF THE ERROR, 
on Bens BAD TEST DATA, AND APPLICABLE DEVICE REGISTER 


2.0 HARDWARE REQUIREMENTS 


THE FOLLOWING HARDWARE IS REQUIRED TO RUN THE M8203 STATIC * 


LOGIC TESTS: 


nage Ala -05.10,20, 30,34, 35,40,45.50,60, OR 70 
CONSOLE TERMINAL 


a, 
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DMC-11 OR KMC=11 MICROPROCESSOR 
M8c03 LINE UNIT AND BCO8S=1 CABLE AND BERG CONNECTORS 


3.0 PRELIMINARY PROGRAM REQUIREMENTS 

THIS PROGRAM OPERATES THE MICROPROCESSOR EXTENSIVELY IN 
ORDER TO TEST THE LINE INIT. FOR THIS REASON, THE 
MICROPROCESSOR Yt AND SUBSYSTEM FUNCTIONAL TESTS 
SHOULD BE RUN FIRST, AND ANY FAULTS FOUND IN_ THE 
MICROPROCESSOR MODULE SHOULD BE REPAIRED, PRIOR TO RUNNING 
THE M8203 STATIC LOGIC TESTS. 


4.0 GENERAL PROGRAM CONSIDERATIONS 


4.1 DIAGNOSTIC SUPERVISOR 

THIS PROGRAM IS COMPATIBLE WITH THE STANDALONE DIAGNOSTIC 
SUPERVISOR, AND MUST BE LOADED TO BE CO-RESIDENT WITK TH* 
SUPERVISOR, OR BE PREVIOUSLY COMBINED WITH THE SUPERVI SG? 
AND LOADED AS A SINGLE FILE. IN EITHER CASE, THE COMBINED 
PROGRAM WILL NOT EXCEED 16k OF MEMORY. 

4.2 EXECUTION TIME 

THE MAXIMUM TIME REQUIRED TO RUN THE erie STATIC LOGIC TESTS 
1S ABOUT 45 SECONDS PER PASS FOR EACH UNIT 

4.3 XXDP+ 

THIS PROGRAM MAY BE LOADED UNDER XXDP+, AND MAY BE RUN IN 
DUMP MODE OR CHAIN MODE. 

4.4 ACT/SLIDE 

THIS PROGRAM MAY BE LOADED UNDER ACT OR SLIDE AND MAY BE RUN 
IN DUMP MODE OR CHAIN MODE. 

4.5 APT 

THIS PROGRAM MAY BE LOADED BY THE APT SYSTEM (INCLUDING 
APT=RD) AND RUN IN PROGRAM MODE OR SCRIPT MODE. 

4.6 MEMORY MANAGEMENT 


MEMORY MANAGEMENT IS NOT UTILIZED IN He fy PROGRAM. IF IT IS 
INSTALLED, IT IS DISABLED BY THE PROGRAM 
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4.7 MEMORY PARITY OPTION 


IF PARITY MEMORY IS sion MEMORY PARITY TRAPS ARE 
DISABLED BY THE PROGRAM 


4.8 ERROR LOGGING 


AT THE END OF EACH PASS ON ALL UNITS, THE PROGRAM PRINTS OUT 
THE CUMULATIVE TOTAL NUMBER OF ERRORS SINCE THE LAST START OR 
RESTART COMMAND. 


5.9 PROGRAM LOAD MEDIA 


THIS PROGRAM CAN BE LOADED FROM PAPER TAPE USING THE 
ABSOLUTE LOADER OR FROM ACT, SLIDE, OR APT SYSTEMS, OR FROM 
ANY MEDIA SUPPORTED r XXDP+, WHEN USING THE PAPER _ TAPE 
ABSOLUTE _ LOADER, THE PROGRAM SHOULD BE LOADED FIRST, 
FOLLOWED BY THE DIAGNOSTIC SUPERVISOR. WHEN USING XXDP+, THE 
DIAGNOSTIC SUPERVISOR SHOULD BE LOADED FIRST, FOLLOWED By 
THE DIAGNOSTIC PROGRAM. 


6.0 OPERATING INSTRUCTIONS 
6.1 LOADING AND STARTING PROCEDURES 


6.1.1 LOADING PROCEDURES 


THIS PROGRAM MAY BE LOADED FROM PAPER TAPE USING THE 
ABSOLUTE LOADER. IT MAY ALSO BE LOADED FROM ANY XXDP+ LOAD 
MEDIA. WHEN LOADED UNDER XXDP+, THE DIAGNOSTIC SUPERVISOR 
WILL BE LOADED AUTOMATICALLY. 


6.1.2 STARTING PROCEDURES 


THE PROGRAM STARTS AT LOCATION 200. USE STANDARD DEC 
PROCEDURES TO START THE PROGRAM. 


6.1.3 STEPS FOR QUICK AND SIMPLE EXECUTION 


THE DIAGNOSTIC CAN BE EXECUTED STANDALONE UNDER XXDP+, 
WITHOUT READING THE REMAINDER OF THIS DOCUMENT, AS FOLLOWS: 


A) LOAD AND START DIAGNOSTIC USING RUN COMMAND 

B) RECEIVE Senet 36 SUPERVISOR IDENTIFICATION AND PROMPT (DRS-(>) 
C) ENTER STA<CR> 

D) ANSWER HARDWARE AND SOFTWARE QUESTIONS 

E) GET END OF PASS MESSAGES OR ERROR MESSAGES 

F) TO END EXECUTION, ENTER CONTROL/C 
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6.2 INITIAL DIALOGUE 


AFTER THE PROGRAM AND THE Thewet tt Ica ARE Sree THE PROGRAM 


IS STARTED, THE FOLLOWING IDENTIF 


DRS LOADED 
DIAG. RUN-TIME SERVICES 
CZ7DMR-B-0 


M8203 STATIC LOGIC TESTS = PART 1 OF 2 
ty 1S M8203 


CATION 


THE OPERATOR THEN PROCEEDS BY TYPING ONE OR MORE OF THE 
COMMANDS DESCRIBED iN THE FOLLOWING SECTION 6.3. (FOR MORE 
DETAILED INFORMATION, REFER TO THE DIAGNOSTIC SUPERVISOR 
FUNCTIONAL SPECIFICATION). 


6.3 PROGRAM OPTIONS 


6.3.1 START COMMAND 


CAAA EERE REE EER EERE RRR ERAT RRR R REE ERE 
STA(RT)/TESTS:<TEST=LIST>/PASS : <PASS-CNT>/FLAGS: 
<F LAG-LIST>/EOP:<INCR> 


RARER EREAERAEEEEEEEREERERAEREREKRAERERE ERE ES 


6.3.1.1 TESTS SWITCH (/TESTS:<TEST=LIST>) 


<TEST=LIST> IS A SEQUENCE OF DECIMAL NUMBERS (1:2 ETC.) OR 
RANGES OF DECIMAL NUMBERS (1-5:8-10 ETC.) THAT SPECIFY THE 
TESTS TO BE EXECUTED. THE NUMBERS ARE SEPARATED BY COLONS. 
THE NUMBERS RANGE FROM 1 TO THE LARGEST TEST NUMBER IN THE 
DIAGNOSTIC. THEY MAY BE SPECIFIED IN ANY ORDER. TESTS WILL 
BE EXECUTED IN NUMERICAL ORDER REGARDLESS OF THE ORDER OF 
SPECIFICATION. THE DEFAULT IS _ TO EXECUTE ALL TESTS. ON 
THIS AND ALL SWITCHES, THE ANGLE BRACKETS <> ARE PUNCTUATION 
USED _IN THE DEFINITION ONLY, AND ARE NOT TO BE TYPED BY THE 
OPERATOR. SEE EXAMPLE AT END OF 6.3.1.5. 


6.3.1.2 PASS SWITCH (/PASS:<PASS-CNT>) 


<PASS~CNT> IS . DECIMAL NUMBER INDICATING THE DESIRED NUMBER 
OF PASSES. A PASS IS DEFINED AS THE EXECUTION OF THE FULL 
DIAGNOSTIC (ALL SELECTED TESTS) AGAINST ALL UNITS SUBMITTED. 
THE DEFAULT IS NON-ENDING EXECUTION. IN THIS CASE EXIT FROM 
THE PROGRAM IS ACCOMPLISHED EITHER BY TYPING A CONTROL/C OR 
BY OCCURANCE OF AN ERROR WITH THE HALT ON ERROR FLAG BEING 
A Pa | IS A RETURN TO COMMAND MODE. SEE EXAMPLE AT 


SEQ 
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6.3.1.3 FLAGS SWITCH (/FLAGS:<FLAG=LIST>) 


<FLAG=*LIST> IS A SEQUENCE OF ELEMENTS OF THE FORM <FLAG>, 
<FLAG=1>, OR <FLAG=0>, SEPARATED BY COLONS, WHERE <FLAG> HAS 
ONE OF THE FOLLOWING VALUES: 


HOE HALT ON ERROR, CAUSING COMMAND MODE TO BE 
ENTERED WHEN AN ERROR IS ENCOUNTERED 

LOE LOOP ON ERROR, CAUSING THE DIAGNOSTIC TO LOOP 
CONTINUOUSLY WITHIN THE SMALLEST DEFINED BLOCK 
OF CODING (SEGMENT, SUBTEST, OR TEST) CONTAIN- 


ING THE ERROR 
IER INHIBIT ERROR REPORTING 
IBE INHIBIT BASIC ERROR REPORTS 
IXE INHIBIT EXTENDED ERROR REPORTS 
PRI DIRECT ALL MESSAGES TO A LINE PRINTER 
PNT PRINT NUMBER OF TEST BEING EXECUTED 
BOE BELL ON ERROR 
UAM RUN IN UNATTENDED MODE, BYPASSING MANUAL 
INTERVENTION TESTS 
ISR INHIBIT STATISTICAL REPORTS 
IDU pty U DROPPING OF UNITS BY DIAGNOSTIC 
LOT LOOP ON TEST 


THE FLAGS NAMED OR EQUATED TO 7 ARE SET, THOSE EQUATED TO 0 
ARE CLEARED. A FLAG NOT SPECIFIED IS CLEARED. IF THE FLAGS 
ay (t Dt GIVEN ALL FLAGS ARE CLEARED. SEE EXAMPLE AT 


6.3.1.4 END OF PASS SWITCH (/EOP:<INCR>) 


<INCR> IS A DECIMAL NUMBER INDICATING HOW OFTEN (IN TERMS OF 
PASSES) IT IS DESIRED THAT THE END OF PASS MESSAGE BE 
PRINTED. THE DEFAULT IS AT THE END OF EVERY PASS. SEE 
EXAMPLE AT END OF 6.3.1.5. 


6.3.1.5 EFFECT OF START COMMAND 


THE EFFECT OF THE START COMMAND IS TO INITIATE THE HARDWARE 
PARAMETER DIALOGUE, THE SOFTWARE PARAMETER DIALOGUE, AND 
THEN THE DIAGNOSTIC TESTS THEMSELVES. 


THE HARDWARE PARAMETER DIALOGUE COMMENCES WITH THE QUESTION 
"# UNITS?"' TO WHICH THE OPERATOR REPLIES WITH A DECIMAL 
NUMBER N FROM 1 TO 16. THE TERM ‘UNIT’* REFERS TO THE DEVICE 
TO WHICH THIS SERIES OF DIAGNOSTICS IS DEDICATED. FOLLOWING 
THIS ARE THE QUESTIONS WHEREBY THE P-TABLES THEMSELVES WILL 
BE BUILT. EACH P-TABLE IS A CORE-RESIDENT TABLE CONTAINING 
ALL_ THE HARDWARE INFORMATION FOR ONE UNIT. THE OPERATOR 
MUST SUPPLY N (NUMBER OF UNITS) VALUES FOR EACH QUESTION. 
HE MAY DO THIS BY GIVING ONE ANSWER TO EACH QUESTION ‘= 


THE RESPONSE RADIX (D FOR DECIMAL, B FOR BINARY, O FOR 


SEQ 
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OCTAL, L_ FOR YES/NO) IN PARENTHESES AND THE DEFAULT VALUE 
AFTER THE PARENTHESES. 


FOLLOWING THE HARDWARE QUESTIONS ARE THE SOFTWARE QUESTIONS 
TO BUILD THE SOFTWARE TABLES, WHICH DEFINE THE MODE (QUICK 
VERIFY ETC.) THAT THE DIAGNOSTIC WILL EXECUTE IN. 


WHEN THE QUESTION '# UNITS?°* IS ANSWERED, MEMORY STORAGE IS 
ALLOCATED FOR THE P-TABLES, AND IF THERE IS NOT ENOUGH TO 
ACCOMMODATE THEM THE MESSAGE ‘TCO MANY UNITS'’ IS ISSUED. IN 
et ae MUST BE EXECUTED MORE THAN ONCE [0 


EXAMPLE : 
STA/TESTS:1:2-4:6:8-10/PASS: 3/F LAGS: IER: HOE=1 : UAM: LOE 


THiS COMMAND WILL CAUSE THREE PASSES TO BE MADE, EACH PASS 
CONSISTING OF TESTS 1,2,3.4,6,8.9, AND 10 EXECUTED AGAINST 
ALL UNITS. THERE IS NO DIFFERENCE BE TWEEN SAYING <FLAG> AND 
SAYING <FLAG=1>. THE NOTATION <FLAG=0> IS MEANINGFUL ONLY ON 
A C OTHER THAN START TO CLEAR A_FLAG_ THAT WAS 
PREVIOUSLY SET. NOTE THAT ON ALL COMMANDS ONLY THE FIRST 
THREE LETTERS ARE SCANNED. 


6.3.2 RESTART COMMAND 


PRARRAAARAASRBRSAALALASSASL ALARA R ERR SRA RASA SR RARER RARER ARRAS ESAS ES SE | 
RES( TART) /TESTS:<TEST=LIST>/PASS : <PASS-CNI>/FLAGS: 
<FLAG=-LIST>/UNITS:<UNIT=LIST> 


(ARR A2A 0220202202222 BASSES ESEASSRSARE SARS RRR RR RR RRR RRR RRS RSS SS 


6.3.2.1 TESTS, PASS, AND FLAGS SWITCHES 
<TEST=LIST>, <PASS-CNT>, AND <FLAG=LIST> ARE AS IN THE START 
COMMAND . 


6.3.2.2 UNITS SWITCH (/UNITS:<UNIT-LIST>) 


<UNIT=LIST> IS A SEQUENCE OF DECIMAL NUMBERS (0,1 ETC.) OR 
RANGES OF DECIMAL NUMBERS (0-5, 8-10 ETC.) THAT SPECIFY THE 
UNITS TO BE TESTED. THE NUMBERS ARE SEPARATED BY COLONS. 


THE NUMBERS MAY RANGE FROM 0 THRU N-1 (N_ IS Ras ty OF 


UN E NUMBER 
INDICATES THE POSITION OF THE P-TABLE AS THE DATA WAS 
ENTERED DURING THE HARDWARE DIAGLOGUE. THE UNITS WHICH ARE 
SELECTED MUST NOT HAVE BEEN DROPPED BY THE DROP COMMAND. 
SEE THE DISCUSSION OF ADD AND DROP COMMANDS BELOW. DEFAULT 
5B ALL UNITS WHICH HAVE NOT BEEN DROPPED BY A_ DROP 


6.3.2.3 EFFECT OF RESTART COMMAND 


SEQ 
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THE RESTART COMMAND DIFFERS FROM — START wer IN THAT 
THE P=TABLES FROM THE PREVIOUS START COMMAND (THERE MUST 
HAVE BEEN ONE) ARE JSED, INSTEAD oF NEW ONES BEING BUILT. 
THE UNITS SWITCH GIVES THE ABILITY TO SELECT A_ SUBSET OF 
THESE. THE SOFTWARE DIALOGUE MAY OPTIONALLY BE REEXECUTED 
(OPERATOR WILL BE ASKED). THE COMMAND CAN BE USED AFTER 
COMMAND MODE HAS BEEN REENTERED IN ANY OF THE THREE NORMAL 
WAYS: A) THE REQUESTED NUMBER OF PASSES HAVE BEEN MADE 8) 
AN ERROR WAS ENCOUNTERED WITH THE HALT ON ERROR FLAG SET C) 
A CONTROL/C WAS ENTERED BY THE OPERATOR. 


6.3.3 CONTINUE COMMAND 


LARRRAAAASLALALAALARASLASARAASSASRR RAR ARR S SRR RRR RR RRA RRR RRS SS SS 


CON (TINUE) /PASS : <PASS-CNT/FLAGS :<FLAG=LIST> 


TEAR AAA AAA TREAT AEE R ARERR ETRE EATER EERE RETR ERE 
6.3.3.1 PASS SWITCH (/PASS:<PASS-CNT>) 
<PASS-CNT> IS SAME AS IN START COMMAND, BUT THE DEFAULT IS 


THE UNSATISFIED PASS-CNT FROM THE PREVIOUS START OR RESTART. 
IF NONE REMAINS, THE DEFAULT IS NON-ENDING EXECUTION. 


6.3.3.2 FLAG SWITCH (/FLAGS:<FLAG=LIST>) 


<FLAG=LIST> IS SAME AS IN START COMMAND, BUT UNSPECIFIED 
FLAGS RETAIN THEIR CURRENT VALUE. 


6.3.3.3 EFFECT OF CONTINUE COMMAND 


CONTINUE MUST FOLLOW A START OR RES'ART, AND COMMAND MODE 
MUST HAVE BEEN ENTERED DUE TO A _ HALT ON ERROR OR A 
CONTROL/C. THE EFFECT OF THE COMMAND IS TO GO TO THE 
BEGINNING OF THE TEST THAT WAS BEING EXECUTED WHEN THE HALT 
OR CONTROL/C TOOK PLACE. SOFTWARE DIALOGUE MAY OPTIONALLY 
BE REEXECUTED. HARDWARE PARAMETERS MAY NOT BE CHANGED. 


6.3.4 PROCEED COMMAND 


(ARR RRAAARASALA£A ££ 2A SSARSSSARAR ARR ERR RRR RR RASA R RRR SERS RRR SES S| 


PRO(CEED) /FLAGS:<FLAG=LIST> 


ARR ALARAAAR£2££2 £22222 SRR SERA RRRRASESER RRR RRA RRRRRR RRR RRR RSE SE DI 


6.3.4.1 FLAGS SWITCH (/FLAGS:<FLAG-LIST>) 


<FLAG-LIST> IS AS IN THE START COMMAND, BUT UNSPECIFIED 
FLAGS RETAIN THEIR CURRENT VALUE. 


6.3.4.2 EFFECT OF PROCEED COMMAND 


SEQ 


10 
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PROCEED ee FOLLOW A START, RESTART, OR CONTINUE. "iooart 
MODE MUST HAVE BEEN ENTERED VIA A HALT ON ERROR. THE EFFECT 

COMMAND IS 10 BEGIN EXECUTION AT THE LOCATION 
FOLLOWING THE ERROR CALL. NEITHER HARDWARE NOR SOF TWARE 
PARAMETERS MAY BE ALTERED. 


6.3.5 ADD COMMAND 


(ARR RRRRASZASLASLSRAALALERSASASESARESER ESR RRR E RRR RRR RRR RRR RS SS 


ADD/UNITS:<UNIT=LIST> 


ARAAALAARAAAAASLALARRAASLASASLASLALALASLAR ASAE EERE ERR RRS ERR RRR RS SS 


6.3.5.1 UNITS SWITCH (/UNITS:<UNIT=LIST> 
<UNIT=LIST> IS AS IN THE RESTART COMMAND. 


6.3.5.2 EFFECT OF ADD COMMAND 


THE Bae ki: a Age ARE ADDED TO THE TEST SEQUENCE. EACH 
MUST HAVE P-TABLE ME Y TO AN EARLIER 
MUST BE FOLLOWED BY A 
THE UNITS SWITCH MUST BE SPECIFIED. 
THE ADD COMMAND IS MEANINGFUL ONLY FOR UNITS THAT WERE 
PREVIOUSLY DROPPED. 
6.3.6 DROP COMMAND 
Pee eee eerste iii ii irri iit iii citi iii titi titi iti it iit) 
DRO(P) /UNITS:<UNIT=LIST> 
REE A EERE ERE ERE EEE EAE RATER AEE REE ERER 
6.3.6.1 UNITS SWITCH (/UNITS:<UNIT-LIST>) 
<UNIT=LIST> IS AS IN THE RESTART COMMAND. 


6.3.6.2 EFFECT OF DROP COMMAND 


THE UNITS SPECIFIED WILL BE DROPPED FROM TESTING. THE UNITS 
WILL BE RESELECTED ONLY BY THE EXECUTION OF AN ADD OR START 
COMMAND. THE UNITS SWITCH MUST BE ENTERED. THIS COMMAND 
MUST BE FOLLOWED BY A RESTART OR A CONTINUE COMMAND. 


6.3.7 PRINT COMMAND 


ASSO ASSSASSLASLSLASSESER ERE S ERR ESR R RRS R RSE ERR RSE RRR R SEER 


PR] (NT) 


SRT AARARAAEAREARAAREARARERRAARRARERAEEREEREAREE ERE EE 
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6.3.7.1 EFFECT OF PRINT COMMAND 
THE TOTAL NUMBER ? ERRORS FOR EACH UNIT SINCE THE LAST 


START OR RESTART COMMAND ARE PRINTED. THE ISR (INHIBIT 
STATISTICAL REPORT ING) FLAG IS CLEARED. 


6.3.8 DISPLAY COMMAND 


(ARR RARSAASAAAASAALALASAASASASSLESER ESAS ESAS RSE ERR SERRE RRR ES SS 


DIS(PLAY) /UNITS:<UNIT=LIST> 

RAAT RERREAEERRREREEERER EERE E ERE ERREE ERE REE EERE REE EERE 
6.3.8.1 UNITS SWITCH (/UNITS:<UNIT=LIST>) 

<UNIT=LIST> IS AS IN THE RESTART COMMAND. 


6.3.8.2 EFFECT OF DISPLAY COMMAND 
THE HARDWARE P-TABLES FOR ALL UNITS UNDER TEST ARE PRINTED 
OUT IN THE FORMAT IN WHICH THEY WERE ENTERED. ANY UNITS 


THAT WERE DROPPED BY THE OPERATOR ‘DROP’’ COMMAND ARE SO 
DESIGNATED. 


6.3.9 FLAGS COMMAND 


(ARS AAA £A£L£A 0 R22 20202 2ESRSSESESSES ASE SESE RSS RRR SERRE RRR REESE SS 


FLA(GS) 

CAREER TREAT EERE EERE EERE RR EER EERE ER EERE RRR EERE 
6.3.9.1 EFFECT OF FLAGS COMMAND 

THE CURRENT SETTINGS OF ALL FLAGS ARE PRINTED. 


6.3.10 ZFLAGS COMMAND 


LARA AAARSAERRRSERESALESARSLELECLASE SERS RRS ER ERR REE RRR RRR R SSS 


ZFL (AGS) 


LARRRRASRASARSASASASLLLLESSASELES ESSER SERRE RE RE SEER SRE SRR ES 


6.3.10.1 EFFECT OF ZFLAGS COMMAND 
ALL FLAGS ARE CLEARED. 


6.3.11 CONTROL CHARACTERS 
A CONTROL C (C) ENTERED DURING THE EXECUTION OF A DIAGNOSTIC CAUSES 
A RETURN TO COMMAND MODE. 


A CONTROL Z (2) ENTERED DURING ONE OF THE THREE OPERATOR 
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ALOGUE S- at CORE oue st ins (SEE 6.2),HARDWARE DIALOGUE 
(SEE 6.3.1. OR SOFTWARE DIALOGUE (SEE 6.3.1.5) CAUSES THE 
DEFAULTS te af TAKEN FOR THE REMAINDER OF THAT DIALOGUE. 


A CONTROL O (0) ENTERED DURING ~ EXECUTION OF A DIAGNOSTIC 
CAUSES ALL TELETYPE OQUTPUT BE SURPRESSED FOR THE 
REMAINDER OF THE DIAGNOSTIC OR UNTIL ANOTHER O IS TYPED, 
WHICH RESTORES NORMAL TELETYPE OUTPUT. 


6.3.12 HARDWARE PARAMETERS 


THE FOLLOWING 4 QUESTIONS WILL BE ASKED ON A START COMMAND. 
THE VALUE LOCATED TO THE LFFT OF THE —— MARK IS_ THE 
onae VALUE THAT WILL BE TAKEN ON A CARRIAGE RETURN 


1. DEVICE CSR ADDRESS : (0) 160170? 


THIS IS THE ADDRESS AT WHICH THE CSR REGISTERS ‘SELO) RESIDE 
ON THE UNIBUS. THE ALLOWABLE RANGE IS 160000-177776 
(OCTAL), AND THE DEFAULT VALUE IS 160170. 


2. DEVICE VECTOR ADDRESS : (0) 300 ? 

THIS IS THE ADDRESS OF THE INPUT INTERRUPT VECTOR FOR THIS 
DEVICE. THE ALLOWABLE RANGE IS 000-674 (OCTAL), AND THE 
DEFAULT VALUE IS 300. . 

3. DEVICE PRIORITY LEVEL : (0) 5 ? 

THIS IS THE CPU PRIORITY AT WHICH THE INTERRUPT HANDLERS OF 


THIS DFVICE WILL BE EXECUTED. THE ALLOWABLE RANGE IS 0-7, 
AND THE DEFAULT VALUE IS 5. 


SEQ 


4. MICROPROCESSOR RUN SWITCH - TYPE O IF OFF, 1 IF ON: (0) 1 ? 


ey Bay THE PROGRAM IF THE RUN SWITCH ON THE MICROPROCESSOR 


T OR NOT. IF IT i3 SET, RUN IS NOT INHIBITED, AND a 


L E VALUES 
ARE 0 AND 1, AND THE DEFAULT VALUE IS 1 (RUN IS NOT INHIBITED). 


6.3.13 SOFTWARE PARAMETERS 

NO SOF TWARE — QUESTIONS ARE ASKED BY PART 1 OF THE 
STATIC LOGIC TESTS 

6.3.14 EXTENDED DISCUSSION OF P-TABLE DIALOGUE 


THE FULL CAPABILITY OF THE HARDWARE DIALOGUE IS REVEALED BY 
THE FOLLOWING DISCUSSION OF WHAT HAPPENS INTERNALLY. 


AS SOON AS THE QUESTION '# UNITS?°' IS ANSWERED (WITH THE 
NUMBER N, SAY) SPACE IN CORE IS ALLOCATED FOR N P-TABLES. 
ALL OF THE P-TABLES ARE OF THE SAME FORMAT, AND THERE IS A 


13 
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ONE-TO 


ON THE FIRST TRIP THRU THE QUESTIONS, ALL OF THE SLOTS IN 
ALL. OF THE P=TABLES ARE FILLED. IF THE OPERATOR TYPES IN 
N_ RESPONSE TO A_ PARTICULAR 








ONE CORRESPONDENCE BETWEEN THE HARDWARE PARAMETER 
QUESTIONS AND THE SLOTS IN THE P=TABLE FORMAT. 


















USED TO FILL THAT SLOT IN THE REMAINING P-TABLES. 


ON SUBSEQUENT TRIPS THRU THE QUESTIONS, THE SAME PROCESS IS 
CARRIED OUT, EXCEPT THAT THE EARLIEST P-TABLE NOT TO HAVE 
RECEIVED AN EXPLICIT VALUE IN ANY OF ITS SLOTS NOW ASSUMES 
THE ROLE THAT TABLE NUMBER ONE PLAYED IN THE FIRST TRIP. 


THE SERIES OF QUESTIONS IS REISSUED UNTIL AT LEAST ONE 
QUESTION HAS RECEIVED N EXPLICIT VALUES FROM THE OPERATOR. 


IN GIVING A_ STRING OF VALUES, COMMAS WITHOUT INTERVENING 
VALUES MAY BE USED TO INDICATE A REPETITION OF THE LAST 
NAMED VALUE. 


A STRING OF VALUES MAY BE _ GIVEN A RANGE (6-10 F 
EXAMPLE). IF THE VALUES REPRESENT PURE NUMERICAL BATA, THIS 
SAMPLE RANGE TRANSLATES TO THE STRING 6,7.8,9,10 (AN 
INCREMENT OF 1). IF THE VALUES ARE ADDRESSES, THE SAMPLE 
RANGE TRANSLATES TO THE STRING 6,8,10 (AN INCREMENT OF 2). 


NOW LET US SEE HOW WE COULD USE THESE CAPABILITIES TO 
CONSTRUCT A_SET OF P=TABLES. ASSUME THAT WE HAVE 16 UNITS, 
AND THAT THERE ARE THREE HARDWARE PARAMETERS FOR EACH (THREE 
SLOTS IN THE P-TABLE, THREE HARDWARE QUESTIONS IN_ THE 
DIALOGUE). _LET ip § DESIRED VALUE FOR THE FIRST PARAMETER BE 
THE NUMBER 75 FOR ALL 16 TABLES. LET THE DESIRED VALUE FOR 
THE SECOND PARAMETER BE EQUAL TO THE UNIT NUMBER 
(0,1,2,....15) EXCEPT FOR UNIT 12, WHICH SHOULD RECEIVE THE 
VALUE 11. LET THE DESIRED VALUE FOR THE THIRD PARAMETER BE 
THE NUMBER 76 FOR THE FIRST 7 UNITS AND THE NUMBER 77 FOR 
THE LAST 9 UNITS. 


THE FOLLOWING DIALOGUE WOULD ACCOMPLISH THIS GOAL: 
# INITS (D) ? 16 
T 0 


UNI 

<QUESTION 1> ? 75 
<QUESTION 2> ? 0-6 
<QUESTION 3> ? 76 


}> 
<QUESTION 2> ? 7-11,,13-15 
3> ? 77 


THE FIRST TIME THE SERIES 


IS ASKED, SLOT ONE meets A 75 
IN ALi 16 TABLES. SLOT TWO RECEIVES THE VALUES 0,1,2,....6 























ne 
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IN TABLES 0 THRU 6 AND A CONSTANT 6 IN TABLES 7 THRU 15. 
SLOT THREE RECEIVES A CONSTANT 76 IN ALL 16 TABLES. 


THE SECOND TIME THRU THE SERIES, TABLES 7 THRU THE END ARE 
GOING TO BE AFFECTED (NOTE THAT THIS PIECE OF INFORMATION IS 
PRINTED OUT FOR THE THE OPERATOR IN THE FORM ‘UNIT XX'’ AT 
THE BEGINNING OF EACH SERIES). QUESTION 1 IS RESPONDED TO 
BY A <CR>, SO SLOT ONE STAYS AT CONSTANT 75 IN TABLES 7 
THRU 15, SINCE NO NEW EXPLICIT VALUES ARE TYPED IN. SLOT TwO 
GETS THE VALUES 7,8,9.10,11 IN TABLES 7 THRU 11, AND 

GETS AN 11 IN SLOT 12. AND GETS THE VALUES 13,14,15 IN 

TABLES 13 THRU 15. SLOT THREE GETS THE VALUE 77 [N TABLES 7 

U . 


THE DIALOGUE IS TERMINATED WHEN THE SOFTWARE RECOGNIZES THAT 
16 EXPLICIT VALUES HAVE BEEN GIVEN FOR AT LEAST ONE QUESTION 
(NAMELY QUESTION 2). 
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7.0 DEVICE INFORMATION TABLES 


FEAARARAAAARARAARRARARARRAAAARAERARKAARAAAAAARAARAARRARKAARORARAARARAEARAAAHARARRAS 


* MAINTENANCE REGISTER = BSEL1 


STRAARAAAERAAARARARRARAARAERARAERAARARARERURERAARRAARERARAAAAARAAAARAAARARARRERDEE 


RUN = BIT? 
MCLR = BIT6 
STEPLU = BIT4 
LULOOP = BIT3 
ROMO = BIT 

ROM] = BIT] 
STEPMP = BITO 


STARA AAAAARAAA RARER RAAERRARERAARAEAEARRAERAEREAAEREREEAREAAARRARERERREARHEHAREES 


* OBUS REG 10 - TRANSMITTER BUFFER 


SRAARAAAAAARAAAAARAAARRAAEAREAARAARARRARERAE TARA AERERAARAKREEAEAEAEREREHREREHA EEE 


Tx? = BIT? 
TX6 = BIT6 

1x5 = BITS 

TX4 = BITS 

TX3 = BIT3 

TX2 = BIT2 

Tx] = BIT1 

TxO = BITO 

FEAR AEAEREEERE AREER ERERREAERAEARERAEARRAERA AERA ERRAAEEREEEREEEEEREEN HEAR ERED 
* OBUS REG 11 

SERA AAAAAAAEAAAARER AER AKA ARERAARERERARAER AI RERAAEAERERARARARERRAEREREREEREERRE AH 
Oc = BIT7 

GOAH = == BIT3 

ABORT = BIT2 

EOM = BIT1 

SOM = BITO 


« 
FEAARARAAARAARAAARAAERERAAREAAAEREREAAAAERAAAERAREARAARARAAERAAEHARARAAAAERARAREHERE ES 


* OBUS REG 12 


SEAAAARARAAAAAAAAEKAAARERAEARRARAEEAARARRAEARAEREREEAAAREARAETRARERAAERARAREEEKEE EES 


IC = BIT? 

BPOLL = BIT6 

LULP = BITS 

LEAR EERE ERE ER ERRATA RAL ER AEE EERE E REE REA EEE ERE Eee 
* OBUS REG 13 

LEAR REE EERE EEE RARER ERE R EERE RARER EEE ER ERE REE R EEE ER EEE 
POLL = BIT7 

DTR = BIT6 

SELFR = BITS 

HDX = BIT4 

MAINT? = BIT3 

MAINT2 = BIT2 

SELSBY = BITI 


SAAARARAAAAAAREEARATRERAARAEERERERAERAHERARERAEREERRERAHHKHHKERARRHReeteReneewesee 


men 
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58 * OBUS REG 14 

59 ERATE AAAAA RARE RARER RAE ERERAEERRAERAAHEAEREEHEEEHEREHEERERHREKERE RRR E RE RS 
TXEN = BIT6 

61 DISSI = BITS 

62 RDAX = BITS 

63 WAX = BIT3 

64 ENAX = BITe 

65 AX2 = BIT) 

% AX = BITO 

68 PERERA AAA A EAE AERA REE EAA ERER ARERR ERAEREERERERAAERAREEEREEERARERRHREEERE REE 

69 * OBUS REG 17 

70 LEAR AAAARAERAARAARR EAE ERARRERAERAREARREEREAREAREEHERERRARAEHEAEKEEAEEEHREREEEREEE KEES 

71 CRC2 = BIT7 

72 CRC1 = BIT6 

73 IDLE = BITS 

74 SECA = BIT4 

75 STRIP = BIT3 

76 RDALL = BIT2 

77 IERR = BIT! 

z DDCMP = BITO 

80 FARE RARER ERE EEA EERE ERREAEERERAERERREAEREEAERERAEREERREEKEERREEKE REE E EE ED 

81 * IBUS REG 10 = RECEIVER BUFFER 

82 SEERA RARER A ERA AEE AEREE EERE AERA ERREE KERR EREREREREEERARRAEREEHE ERE ERERE EEE ES 

83 RXx7 = BIT7 

84 RX6 = BIT6 

85 RX5 = BITS 

86 RXG = BITS 

87 Rx3 = BIT3 

88 RX2 = BIT2 

89. Rx1 = BIT] 

~ Rx0 = BITO 

92 FEAR AAA AREA AREER ARETE ETE EEREEEEREREREE EEE EERE EAE REA ERREERREEEEE EEE EER EES 

93 * IBUS REG 11 

94 J RARER AREA AERA ARE EAE RE ERA EERAREREAEAEARAERERREERREERR RARER ERE EES 

95 Oc = BIT7 

96 OACT = BIT6 

97 Sw3 = BITS 

98 ORDY = BITS 

acd SwW2 = BIT3 

100 Sw = BIT2 

101 Sw0 = BIT1 

In UNRR = BITO 

104 FERRARA AAA ERE ARORA AEE HERE EERARAAERAAAEAERERRAERAAREREE TEER EREE EER ERE Ree eee 

105 * JBUS REG 12 

106 FEAR AAA ERERERAERA REE ERAAARAERARERAERARAERAEHERERKEREHHERE EKER R eee eee ee 

107 Ic = BIT7 

108 IACT = BIT6 

109 LULP = BiTS 

110 IRDY = BITS 

111 OVRR = BIT3 

112 RAB = BIT2 

113 EBLK = BIT 

114 BCC = BITO 





_— 


CZDMRB M8203 STATIC DIAG #1 
PROGRAM DOCUMENT 


DWNAW SW —0O OWDNOuW 


ol cel el oD ct call el cel cal ee cae Del cal el wl ell ceil el cl cl el ey el el 
Wh 


BSRSKAKUNYSVSVRK RON sano 


140 


— at ee 
DAD ADA 
WNW WwR— 


159 





r 2 
MACRO VO3.01 17-O0CT=79 08:49:54 PAGE 4-2 SEG =18 


RRR AARAAAARARARAERERAAAATREHAERAARAEAEAAARARREHERAARERHARRRRARRRRERHHRRRE RAEN E ee 


* [BUS REG 13 


RING = BIT? 
DTR = BIT6 
RTS = BITS 
HDX = BITS 
MODR = BITS 
CS = BIT2 
STBY = BIT) 
CARR = BITO 


RRR EARAAREHERARAREREERAREEAERARHHHEREEHRERERARERERERHEAHREKR ERR REE REE 


* IBUS REG 14 


MADARA SRARAAAASAARRRR SSSR RRR RRR RE RR RRR RRR RRR EER R ERR SRR SERRE SRS RRR RRR ERROR ERS 


READY = BIT7 
TXEN = BIT6 
DISSI = BITS 
RDAX = BITS 
WAX = BIT3 
ENAX = BIT2 
AX2 = BIT1 
AX) = BITO 


-RERAEAEEEAEEREEREREREEAAR ARERR AREREERAEREREARRRREHEHHRRRRERAREREERERRERKRE ERE REED 


* IBUS REG 17 


CAAA RAAAAAAAEAAAARRERREREEEERERERERHREEEHHHEEKSHHHKEEKeHRKRHeeeteneReetennneee 


SIGR = BIT7 
$1GQ = BIT6 
TXDATA = BITS 
OCOR = BITS 
ICIR = BIT3 
TESTMD = BIT2 
MC = BIT! 


LK 
DDCMP = BITO 


mittee eee RRR RRRRRRRRRRRR RRS RRR RR RRR RRR RR RRR RRR ER RRR RRR RRR RRR RRR RR RRR RRR RSE 8 


* AXO0-15 = USYRT REG 0 (READ ONLY) 


J RAAAARAAARAAAEAEREERRRERE RE RAERKARARARHERERAARERARREARERAREREREREREHHERH EEE HR REE Ee 


RX7 = BIT7 
RX6 = BIT6 
Rx5 = BITS 
RX4 = BITS 
RX3 = BIT3 
RX2 = BIT2 
RX1 = BIT] 
RxO = BITO 


REE AAAEAERAAAAAAEAAEAERAAAAAEARARAAEERAREREEREREEARERERHRREREEREREKE KER E ERE EEE EES 


* AX0-16 - USYRT REG 1 (READ ONLY) 


SERRA ARAERAEAAARARKREAARAEREEKEAREEREREEREHHRHHR RAH R RH KeKeKetHeseeeeeeteeesene 


RERR = BlT7 
ASBC2 == BIT6 
ASBC1 == BITS 
ASBCO) = =: BITS 
ROR = BIT3 
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RABT = BIT2 
REOM = BIT) 
RSOM = BITO 


WAAR AARALARARARRSAASRSRRARARRRR RRR RARRRRRRR RRR RRR R RRR RRR RRR RRR RRR RRR ARRAS SS DD | 


* AX1=15 = USYRT REG 2 


FERRARA RAEARAARAAAARRARERAAERAAAEAAKARAARARARERAARERAAREAREARRERREEHERARHEAREREN ED 


1X7 = BIT7 
TX6 = BIT6 
Tx5 = BITS 
TX4 = BiTS 
Tx3 = BIT3 
TX2 = BIT2 
Tx] = BIT1 
TxO = BITO 


FRARAAAAARARAAARAAAEERAEERARARAAAHEERREKEREAERRRARAERARERAEAAEAEEEREEREHRREERE ES 


* AX1-16 = USYRT REG 3 


FERRARA ARERREREAEERARRERARARAAERARREARRRERERAAARARAAARRARRAERARARERTRRAHERARREE ES 


TERR = BIT? 
TXGA = BITS 
TXAB = BIT2 
TEOM = BIT) 
TSOM = BITO 


'MmAARaAAARAAARAAAARASRASASLAASAARR RR RRR RRRAR RRR RRR RR RRR RARER RRR RRR RRR RRR RRR RAS SS DD | 


* AX2=15 = USYRT REG 4 


MARA AAAAAAAAALAAARSAAASERRR ERR RR RRR RRR RRR A RRR RRR RR RRR RRR RRR RRR RRR RRA SRA S ESD SD] 


SYN7 = BIT7 
SYN6 = BIT6 
SYNS = BITS 
SYN4 = BITS 
SYN3 = BITS 
SYN2 = BIT2 
SYN1 = BIT] 
SYNO = BITO 
SYNCH = 226 


FERRARA RAERAAAAEAEAEAEEREREEAEARAEAKAEAEREREREAAERAAEEAEAREAERAAAAHEEARRRERAREEERREDS 


* AX2-16 = USYRT REG 5 


J RAAAAARAAAAAAAAARAEARAAAEAAERAAEAREAERAATAEAAAERAAERRARAAEAAARHRA HERE REREREEARREES 


APA = BIT7 
DDC = BIT6 
STR = BITS 
SEC = BITS 
IDL = BIT3 
CRCTY2 = BIT2 
CRCTY? = BIT1 
CRCTYO = BITO 


MASA ARALASARS ASR ARS RRA RR RRR RRR RRR RRR RR RRRRR RRR RR RRR RR RR RRR RR RRR RRR RAS RRR SEE OD | 


* AX3-15 = USYRT REG 6 


'mARRAAASAAAAAAAASARASRRR RRR RRR RRR RRR RR RR RRR RRR RRR RRR RRR RRR RRR RRR RRR RRR RRR SEES 


1422 = BIT7 
xyZ = BIT6 
C32eaCC == BITS 
v35 = BITS 


—~ 


nm 
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4 ASRS RR RRRRRRRRRRRRRRRRRRR RRR REAR RRR RARER RRR RRR RRR ERR ERE E RR RRR REE ERE R SSS 


BITO 
1422! x¥Z2!C32BC0!V35! INTGRL ! OP 


* AX3-16 = USYRT REG 7 


RAAT AREAAAAAAARAARERHERAEHEREAAEERAHREAERERRHEERRARRHRHeRKRAeEKeheReeeReeeaeeese 


TXLEN2 
TXLEN1 
TXLENO 
RXLEN2 
RXLENT 
RXLENO 


| 


SEQ 


20 


nan 
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8.0 TEST DESCRIPTIONS 


SPEARS AAAARAAARERRARAAAAARAERAARAAARAAAAARAARAARARRAAARAAAAEARAAAAARARAERAAERAARAEE 


TEST 1 = MICROPROCESSOR CSR ADDRESSING TEST (SELO) 
* 


* THIS TEST epi: THE da sey pee em CSR (SELO), TO MAKE SURE 
* THAT A NON-EXISTENT MEMORY TIME-OUT TRAP DOES NOT OCCUR WHILE 
* ATTEMPTING TO ADDRESS THE wt] CROPROCESSOR 


PETITE LITITII TITTLE TTT TTT LLL LLL LLL LLL LLL 


FTAA AAAAEAAAAAAARARARRAAAEARAEAERARAEARARARKAERAEAAARARERAREEARERAARERERHRAEAEREREEEES 


TEST 2 = INBUS/OUTBUS REG 14 INITIALIZATION TEST 


* MASTER CLEAR (MCLR) IS SET IN THE MICROPROCESSOR, IBUS REG 14 IS READ 
* AND COMPARED TO 200. 


FEAAAAAAAAAAAAAARARERAAAAEREREKAERAEEARAEERRAEAEERAEAARARAAEARAEEAAAEAHEREKEARRERHERED 


maha b eee eee ReRRRRRERERRRERRSARARRARERARRARRRR RRR RR RRRRAR RRR RR RRR RRR RRR RRR SRS SS S| 


: TEST 3 = INBUS/OUTBUS REG 14 READ/WRITE BIT TEST 


WRITE, se AN> COMPARE ALL WORDS OF DATA PATTERN A INTO REG 14, 
: BYTE AT A TIME. NON-R/W BITS ARE MASKED OFF TO 0 BEFORE WRITING AND 


EADING. 
DATA PATTERN A = 125, 4352 000, 377,001,002, 904, 910. 020,040. 100.200, 376, 
5, 373, 867, 857, 337,277, 1 


 scelinegdibariapasieaaaidaiandias Sean eiceeahakaieened rail casita ipieimieibliaiaitanbiiaiaiaass 


a eee 2 * 


aes Men 6 a Aik .)|[lU 


TEST 4 = REG 14 MASTER CLEAR TES 
* a tl INTO REG 14, ISSUE MASTER CLEAR, READ REG 14 AND COMPARE 


SEERA AAARAEAAERAAAEARERERAEAERARAREERERAORARAEREAAERENRRA TREE RHRRReKeReneReeeneee 


, T 2 | 
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58 a a. a On wind Mee sieeee MEM Cott 8 le dae eee 
59 TEST_5 = REG 14 UNIBUS RESET (INIT) TEST 
60 * WRITE 377 INTO REG 14, ISSUE UNIBUS RESET (INIT), READ REG 14 AND COMPARE 
62 J ERAAAAAAAAAAAAARERARAREREERREREARREAAEERAREEAERARRARAARERAARARAARERAAEAAEREARE Ee 
63 
64 
65 
eo 
68 J EAAAARARRARARARARAARARAARARARARAARARARRRAEAAAEARAARAAERERARAAREREERAEAARRARERAAAERERE 
69 TEST 6 = LINE UNIT FALSE SELECTION TEST 
71 * FIRST, A MASTER CLEAR IS PERFORMED. THEN, THE PROGRAM SINGLE-STEPS THE 
72 * MICROPROCESSOR THROUGH AN INSTRUCTION WHICH LOADS 041 (OCT) INTO THE MAR 
73 * REGISTER (OBUS* ADRS 14). THEN, THE LINE UNIT REGISTER 14 IS READ AND CHECKED 
2% * TO BE UNAFFECTED (STILL = 0). THIS TEST IS INTENDED TO DETECT A FALSE 
ie * SELECTION OF THE LINE UNIT REGISTERS, WHEN THE LINE UNIT IS NOT BEING 
77 pevererrrer rr titi tt ttt tittti ttt titi ttt t ttt titer ttt titi titi titi tit ttt t ttt ttt ttt) 
78 
79 
80 
81 
82 
83 FEAR RREREREKEEKERARAERRERARE ARERR EAERRERAEAAREEARARAEREREARAERRAA EERE 
8 TEST 7 = INBUS REG MASTER CLEAR TEST 
*® 
86 * FIRST, ALL READ/WRITE BITS OF REGS 10-17 ARE SET BY LOADING A 
87 * DIFFERENT WORD OF PATTERN G INTO EACH REG. THEN, 
88 * A MASTER CLEAR IS ISSUED AND EACH REG IS READ AND COMPARED TO A WORD 
89 « PATTERN M. WHICH CONTAINS THE INITIALIZED STATES OF THE REGS. (UNPREDICTABLE 
90 * BITS ARE MASKED OFF TO 0 BEFORE COMPARISON). 
91 « OUBATTERN G = 000-000. 240-120-177,000-000+001 
92 * PATTERN M = 000,020.000.000.200,000;000-051 
93 FEAR AEE AAEAEERAAEREAEAEAEAERAAEEEAERERAEERAE EAA EEEEREE ERE AREEE EES 
94 
95 
% 
97 
98 
99 LEAR A EERE RARER EEE EAA AAA AEEARERREREERA ERE AEERE REE EH 
100 TEST 8 - REGISTER 10-17 ADDRESSING TEST 
102 * FIRST, A MASTER CLEAR IS ISSUED. THEN, 
103 * WRITE’ A DIFFERENT WORD OF DATA PATTERN B INTO EACH OF REGS 10-17, 
104 * AND AFTER EACH WRITE, READ AND COMPARE ALL REGS TO EXPECTED VALUES. 
105 * UNPREDICTABLE BITS ARE MASKED OFF TO 0 WHEN READ FOR COMPARISON. 
106 * PATTERN B = 000,000,040, 100,220,000,000,051 
107 RARER AREA EAE AERA AEE RARER AAA AEAEAEAERAEAAAEAR AERA REREREEE ERE KERE EEE ES 
108 
109 
110 
111 
112 
113 STAAAAAARARARARARAAAAAEEAERARARRAAARAAAAERARERAREREARE KARE KRAA HERR eANKAReeeeeeenes 
114 TEST 9 = REG 11 READ/WRITE BIT TEST 


Ten 
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* 
* WRITE, READ, AND COMPARE EACH WORD OF DATA PATTERN C INTO REG 117 : 
* DATA PATTERN C = 020,020,020. 


FERRARA AARAAAARARARRARARAARERERRERAARRRARRARAREAEARRAREAERRARTRRAREREARAEHAAAREE EE 


mae hae eRRRARARAAARAASARAARRSRERARAASRRS ERR RR RRR ERR SARS RRR RRR RRR ARR RRR RASS RSE SS | 


“TEST 10 = REG 12 READ/WRITE BIT TEST 


* 
* WRITE, READ, AND COMPARE EACH WORD OF DATA PATTERN D INTO REG 172 : 
* DATA PATTERN D = 000,040,000. 


SEAARARAAKAAARAAAAAARAARARARARRARRARAAREAERARERAHRARREAAAAARAAREREREEREEARHARHEREHE 


J EAA AARARARAREAEAEARRERAARAREAARRARRAERAAEAREAEAREEAERAAEARAERARARAAARAERERARAEERREEES 


TEST 11 = REG 13 READ/WRITE BIT TEST 
* 
* WRITE, READ, AND COMPARE EACH WORD OF DATA PATTERN E INTO REG 13 : 


Pe a I eS eT TEE Te ee 
WWANWWUAWS Noonan NoNnonyny = @ ae 
BIKAFAYSASSRSVRVRAN LS SOwARH 


139 * DATA PATTERN E = 000,120,020.100,120,000. 
140 DRE RRR EERE RRR REAR ERR ERE RRR RRR REE ERRE TERE eee 
141 
142 
143 
144 
145 
146 SUIS UIIIOIEIUISIIUIDIIOOIOISIISUIIDUIIIUO UT EEE EER ER ER ERE EE REE E EERE REE RE REE 
ot 4 TEST 12 - REG 17 READ/WRITE BIT TEST 

* 
149 * WRITE, READ, AND COMPARE coro = OF DATA PATTERN F INTC REG 17 : 
150 * DATA PATTERN F = 050,051, 
151 slidhcleeememaonatnmmassietenatonndcleeatetdtvionhisiaitlaaiiinliiatalin ielsiideiaieamem ial 
152 
153 
154 
155 
156 
157 DR RRR EERE EERE EERE RRA E RETR EERE ee 
Ps TEST 13 — MAINTENANCE CLOCK BIT TEST 

= 
160 * FIRST, A MASTER CLEAR IS ISSUED TO INIT ALL REGS. THEN, THE MICROPROCESSOR 
161 * IS PLACED IN A LOOP ON AN INSTRUCTION, BY SETTING THE iNSTRUCT ION IN SEL6 
162 * AND SETTING ROMI AND RUN IN BSEL1. THE INSTRUCTION IS ONE WHICH REPETITIVELY 
163 * READS LINE UNIT REG 17 INTO BSEL2. THE PDP-11 CAN THEN SCAN BSEL2 TO MONITOR 
164 * THE MAINTENANCE CLOCK BIT, MCLK. THE FOLLOWING SEQUENCE IS THEN PERFORMED 
165 * TO MONITOR MCLK 
166 * = THE PROGRAM REPEATEDLY CHECKS THE MCLK BIT FOR THE 1 STATE, AND IF IT IS 
167 * NOT FOUND WITHIN SEVERAL HUNDRED MILLI-SEC (DEPENDING ON THE PROCESSOR) 
1o8 . _— IS REPORTED. (THE MAINTENANCE CLOCK HAS A PERIOD OF 41.6 MICRO- 

. 
170 * ~ THE PROGRAM NEXT REPEATEDLY CHECKS THE MCLK BIT FOR THE 0 STATE, AND IF 
171 * IT IS NOT FOUND WITHIN SEVERAL HUNDRED MILLI-SEC AN ERROR IS REPORTED. 


he) 


CZDMRB M8203 STATIC DIAG #1 
DOCUMENT 


PROGRAM 


172 
173 


—) 
RRAVSSISIVSAB 


BUR 


el od ah aod OD ed eh ed et eh ee eb ed el 
Co 
e) 


8 


209 
210 


NongNnonoNononolenony 
etd os ot os a 
WONOUBRWMH— 


3 


221 


L 2 
MACRO V03.01 17-OCT-79 08:49:54 PAGE 5-3 SEQ 24 


- THE PROGRAM NEXT REPEATEDLY CHECKS MCLK BIT FOR THE 1 STATE AGAIN, AND 
IF IT iS NOT FOUND WITHIN SEVERAL HUNDRED MILLI-SEC, AN ERROR IS REPORTED. 


IF THE P=TABLE FOR THIS UNIT INDICATES THAT THE MICROPROCESSOR RUN SWITCH 
IS OFF, THE TEST WILL BE SKIPPED. 


FEAR AAAAARARARARAERRAEERERERARAEERERERREAERARAREARRAREREERAREREARAAEEREARHERARAEE EE 


sees 


Ahan RAR AARARARASZALASAALARRARLARARALARARARAR AA RARRRRRR ERS RR ARR RRR R RASA ARES SS S| 


TEST 14 = EXTENDED REGISTER MASTER CLEAR TEST 


* 
* FIRST, ALL _READ/WRITE BITS OF EXTENDED REGS AXO-AX3 ARE SET BY LOADING 
* A DIFFERENT WORD OF os ake H INTO EACH REG. THEN, A MASTER CLEAR IS 

* ISSUED AND EACH REG IS READ AND gre a, A_WORD OF PATTERN I, WHICH 
* CONTAINS hg INITIALIZED Srares ms Pyrenee REGS. 

* PATTERN H = 000,000,377,017,377, ad 95, 377 

. PATTERN ne 000; 000; 000:000: 000; 103. 000.000 


CRAKEAR AARERAEEEARARAARAEEEERERERERRERAREREREEHEEREEEERERER KEES 
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: TEST 15 - EXTENDED REGISTER ADDRESSING TEST 

* 

* FIRST, ISSUE A MASTER CLEAR TO PUT REGS INTO INITIALIZED STATES SHOWN IN 

* PATTERN 1. THEN, WRITE A DIFFERENT WORD OF PATTERN J INTO EACH EXTENDED (AX) 
* REG, 3 AFTER EACH WRITE, READ AND COMPARE ALL EXTENDED REGS TO EXPECTED 


* PATTERN I = 000,000,000,000.000,103.C00.000 
* PATTERN J = 000,000,001,002,004,103.040,100 


FERRARA AEE REREREAAERAAEAEAEAEAEAERARERAEEEREAAEAAAERAEEEEA EERE EEE 


JERE REERAEAERAERAEAEAAEAEREERAEAEEE EERE EE 


TEST 16 ~ REGS 15,16 / AX2-15,AX2-16 READ/WRITE BIT TEST 


USING REGS 15,16, THE INDIRECT REGS AX2-15,AX2-16 ~ REGS 4,5) ARE 
WRITTEN AND READ USING EACH WORD OF PATTERN K. AX2-15 IS COMPARED 
TO THE -— WRITTEN, AND AX2-16 IS ALWAYS COMPARED TO 133. (AX2-16 IS NOT 


252,001 .002,004 
000.000 


; 7 00.200, 
°377.377. 


= 000.900. 
-357,337.277.177~ 


-000.000.001.002, 
377.377,377.377.377.377,. 
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FRA AAARARAERAARAARARARAREREERERERAEERRRERAEEREAAREEAARREAEEAARARAATEREEHERERES 


TEST 17 = AX0-15,AX0-16 READ/WRITE BIT TEST 
IN THIS TEST, A MASTER CLEAR IS DONE, AND THEN A WRITE, READ, AND COMPARE 


L. 
Y BITS IN AX0-15,AX0-16 WHICH ARE NOT READ/WRITE ARE MASKED OFF (TO 0) 
thet a VALUE BEFORE COMPARISON. 
FOR REG 15: 000, ag 000 
FOR REG 16: 000,377,000. 


PTTTIIIIT ITT TTT TTT TTL LLL LLL LLL LLL LLL LLL LLL LLL 
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"TEST 18 = AX1-15,AX1=-16 READ/WRITE BIT TEST 
a 


* IN THIS TEST, A MASTER CLEAR IS DONE, AND THEN A WRITE, READ, — COMPARE 
* ARE PERFORMED IN REGS AX1-15,AX1-16 USING EACH WORD OF PATTERN 

* ANY BITS IN AX1-15,AX1-16 WHICH ARE NOT READ/WRITE ARE MASKED OFF (TO 0) 
* IN THE EXPECTED VALUE BEFORE COMPARISON. 


FEAR ARERR RARERAEEEEKEREEEEERAEREREREEEEEREREAAEEEAEEEEEAERERAEREREEEREEEE DE 


LARS AAAAAAALA £22222 RESELLERS AARARERALAR ARRAS AA RR RRRAR SEAS ARR ERE SRR RRR RRR AS SS | 


TEST 19 = AX3-15,AX3-16 READ/WRITE BIT TEST 


IN THIS TEST A MASTER CLEAR_IS DONE AND THEN A WRITE, READ, AND COMPARE ARE 
PERFORMED IN REGS AX3-15,AX3-16 USING EACH WORD OF PATTERN V FOR WRITING, 
AND PATTERN U FOR COMPARING. 

ANY BITS IN AX3-15,AX3-16 WHICH ARE NOT READ/WRITE fm MASKED OFF (TO 0) 

IN wien to VALUE BEFORE COMPARISON. 


FOR REG 15 : 
FOR REG 16 : 
PATTERN U = 
FOR REG 15 : 
FOR REG 16 : 000,000,000, 9007001 .002.004..040, 
100; 200; 346. 345. 343.307.247.147 


[RARER AAA AEA ARERR EEEARAREEEEAEEAEAERARERRERERATAEAEHERER ARK ERE ERE REE E Eee 
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286 FERRARA RARER AAARERAEEEARARARREEEREERAEREREREREERERARARAEREEEREEEERTEAEREEEEE 
df TEST 20 = REG 17 = AX2-16 READ/WRITE, MASTER CLEAR TEST 

* 
289 * THIS TEST CONSISTS OF 2 SUBTESTS. IN THE FIRST SUBTEST, EACH BYTE OF PAT O 
$0 ® is We of pal Be 17 AND AFTER EACH WRITE, AX2-16 IS READ AND COMPARED 

® 
292 * PATTERN O = 000, of 004 .010,020,040, 100.101.200.201 .300.111,301,375 
295 * PATTERN P = 000,113,200,040.020,010,001, 104,007, 105,007, 144,107,157 
29% * IN THE SECOND SUBTEST, REG 17 IS LOADED WITH $75, A MASTER CLEAR IS ISSUED, 
295 * AND AX2=16 IS COMPARED TO ITS INITIALIZED STATE (103). 
296 Pre Mn thar TR en Re Mi Fh re ts Ba a EE ETT 
297 
298 
299 
302 [EEA EEEAEEREREAEEEEERRAEEERERAREEREEEREERAERREEEEEERAEEAEEEREREE 
303 TEST 21 = TRANSMITTER ee ae DATA aed 
304 * A MASTER CLEAR IS DONE FIRST, AND THEN A BYTE OF PATTERN N IS LOADED INTC 
305 * REG 11 AND THE NEXT BYTE IS LOADED TWICE INTO REG 10. THE PROGRAM THEN WAITS 
306 * AT LEAST 50 MICRO-SEC, AND THEN IT READS AND COMPARES AX1-15 TO THE BYTE WHICH 
307 * WAS LOADED INTO REG 10, AND IT READS AND COMPARES AX1-16 TO THE BYTE WHICH WAS 
308 * LOADED INTO REG 11. THIS PROCESS IS REPEATED (INCLUDING THE MASTER CLEAR) 
309 * FOR EACH PAIR OF BYTES IN PATTERN N. 

* PATTERN N 

* FOR REG 10: 000,125.252.377,000,000.000 

* FOR REG 11: 000,000,000,000.005.012.017 


J ERATE AEA EAEEAAEARERAERERRAEKEERREEEAAEREEAAEEEAREREREEEAEHEREREREREEEERREEEEEERER EE 


WWNWWAWANAWA 
and ad cad ced cea ad a ead 
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319 ERR EERE RARER EERE EERE REE E REET E RE 
sy TEST 22 - TRANSMITTER BUFFER SEQUENCING TEST 

* 
322 * FIRST, A MASTER CLEAR IS DONE, AND THE PROGRAM CHECKS FOR ORDY=1, OCOR=0. 
323 * THEN, 2 TSOM CHARS ARE LOADED INTO THE TX SILO, AND —e TO RIPPLE 
324 * DOWN TO THE OUTPUT. “ Ba 9 CHECKS FOR ORDY=1, OCOR=1. 
325 * NEXT, THE PROGRAM CYC BS! oe BIT UNTIL OCOR=0 AGAIN, AND CHECKS FOR 
326 * THIS TO OCCUR WITHIN iF CYCL 
327 * THE SILO IS THEN FILLED WITH rn Ahi y OF A 256-BYTE BINARY COUNT . hare 
328 * (000-377) AND THE PROGRAM CHECKS FOR ORDY=0 AFTER THE 64TH CHAR IS LOADED. 
329 * THE PROGRAM es STEPLU FOR 8 CYCLES AND Dat THAT AFTER THE 13TH ORDY=1. 
330 * AX1-15 IS READ AND COMPARED TO EXPECTED DAT 
331 * THE REST OF THE BINARY COUNT DATA BYTES ARE *TOADED, CYCLED 8 CLOCKS, READ AND 
332 * COMPARED, A BYTE AT A TIME. UPON COMPLETION, THE SILO IS CHECKED TO BE EMPTY 
333 * WITH ORDY= 1, OCOR=0. 
334 PETTITT TIT TIT TIT TTT TTT I ITIL TTT TTT TTT TTT Titi LLL E LTTE 
335 
336 
337 
338 * 
339 
340 ERR A REE EER ERE E RR E REAR RA ERRATA ERA R EERE RETA E ARERR EEE Eee 
ot TEST 23 = TX MSG TIMING TEST, CHAR MODE, WITH CRC 


ms 


= 
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343 * IN THIS TEST, AN ENTIRE MESSAGE IS TRANSMITTED (USING STEPLU AND LULOOP) 
34 * AND THE PROGRAM MONITORS THE OCCURRENCE OF USYRT TX BUEFER EMPTY FLAGS 
345 * (BY SCANNING ORDY AND OCOR) AND OACT, AT EACH STEP. THE TEST IS DONE IN 
346 * CHARACTER ORIENTED PROTOCOL MODE, USING 8-BIT CHARS AND CRC-16. 
347 * THE FOLLOWING STEPS ARE DONE : 
348 * A MASTER CLEAR IS DONE, AND THE LINE UNIT IS PLACED IN CHAR MODE. 
349 * SOM IS SET TWICE TO SEND 2 SYNCH CHARS. THEN, 2 000 CHARS ARE SENT, AND 
350 * THEN 2 TERMINATING SYNCHS ARE SENT. 
351 * THE TRANSMITTER IS THEN DISABLED, USING OC, AND OACT IS MONITORED FOR THE 
352 © CLEARED STATE AFTER THE 3RD SYNCH COMPLETES. 
353 FEAR AA ERE AREA AEA AEEREEERAREEAEREEEEREAEAEAEREEERAEEAEAERERRERAERETEREEEEEH EEE 
354 
355 
356 
356 
359 FEAR RARER EERE EREEARARRERAERAREERRAERRAEREREEERERERAEAORREREREREERE KERR E ' 
360 TEST 24 = TX MSG TIMING TEST, BIT MODE, WITH CRC 

* 
362 * IN THIS TEST. AN ENTIRE MESSAGE IS TRANSMITTED (USING STEPLU AND LULOOP) 
363 * AND THE PROGRAM MONITORS THE OCCURRENCE OF USYRT. TX BUFFER EMPTY FLAGS 
364 * (BY SCANNING ORDY AND OCOR) AND OACT, AT EACH STEP. THE TEST IS DONE IN 
365 * BIT ORIENTED PROTOCOL MODE. USING B-B1T CHARS AND CRCWCCITT-1. 
366 * THE FOLLOWING STEPS ARE DONE: 
367 * A MASTER CLEAR IS DONE, AND THE LINE UNIT IS PLACED IN BIT MODE. 
368 * SOM IS SET TWICE TO SEND 2 FLAG CHARS. THEN, 2 000 CHARS ARE SENT, AND 
369 * THEN 2 TERMINATING FLAGS ARE SENT 
370 * THE TRANSMITTER IS THEN DISABLED, USING OC, AND OACT IS MONITORED FOR THE 
371 * CLEARED STATE. 
372 FERRARA AERA RREREKRAERRAREREEEEREKEEEREERAEEEAEARAKERAEREARAREREERE EERE EES 
373 
374 
375 
376 
377 
378 SERRA ERE EEREAEEERAEERREERERAREREERARERERERRERARR ERA EREREREERERRERERE REED 
579 TEST 25 = TX MSG TIMING TEST, CHAR MODE, WITH NO CRC 

we 
381 * IN THIS TEST, AN ENTIRE MESSAGE IS TRANSMITTED (USING STEPLU AND LULOOP) 
382 * AND THE PROGRAM MONITORS THE OCCURRENCE OF USYRT TX BUFFER EMPTY FLAGS 
383 * (BY SCANNING ORDY AND OCOR) AND OACT, AT EACH STEP. THE TEST IS DONE IN 
384 * CHARACTER ORIENTED PROTOCOL MODE, USING 8-BIT CHARS AND NO ERROR CHECKING. 
385 * THE FOLLOWING STEPS ARE DONE 
386 * A MASTER CLEAR IS DONE, THE LINE UNIT IS PLACED IN CHAR MODE. 
387 © SOM 1S SET TWICE TO SEND > SYNCH’ CHARS. THEN , 2 000 CHARS ARE SENT, AND 
388 * THEN 2 TERMINATING SYNCHS ARE SENT. 
389 * THE TEST IS PERFORMED WITH TXEN (REG 14, BIT6) SET, AND THE PROGRAM CHECKS 
390 * THAT THIS HOLDS RTS HIGH PAST THE END OF THE MESSAGE. 
391 * THE TRANSMITTER IS THEN DISABLED, USING OC, AND OACT 1S MONITORED FOR THE 
392 * CLEARED STATE. 
393 PARRA ERA R AREA EEA AEEAAEEARAEERAERAAKERAARAERAEARAARERREEAEEEREKERE REED 
394 
395 
396 
397 
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TEST 26 = TX UNDERRUN SET AND CLEAR TEST = CHAR MODE 


IN THIS TEST, A TX UNDERRUN ERROR he FORCED IN EACH OF 2 SITUATIONS, 

AND THEN CLEARED DIFFERENTLY IN EAC 

IN THE FIRST, A MESSAGE IS INITIATED, A 000 CHAR_IS SENT, AND THE TX 
BUFFER IS NOT SERVICED IN RESPONSE TO THE USYRT TX BUFFER EMPTY FLAG, 

WHICH CAUSES UNRR TO SET IN REG 11. THEN, SOM IS SET TO CLEAR THE ERROR, 
AND THIS IS VERIFIED. 

IN THE SECOND SITUATION, A MSG IS INITIATED, A 000 CHAR IS SENT, AND THE IX 
BUFFER IS NOT SERVICED IN RESPONSE TO THE USYRT TX BUFFER EMPTY FLAG, WHICH 
AGAIN CAUSES UNRR TO SET. THEN, A MASTER CLEAR IS DONE, AND THE UNRR BIT 

IS CHECKED TO BE CLEARED 


FERRARA REE AREER EERE REE AEE EEE ERA REE RREREREEAERERRERAEERRERE REE ER EES 


aep ep epepea ee eee 
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TEST 27 = TRANSMIT CHAR LENGTH TIMING TEST = CHAR MODE, CRC 


* 

* THE LINE UNIT IS PLACED IN CHAR MODE (DDCMP) AND A MESSAGE IS INITIATED 

* WITH AN 8-BIT SYNCH AND A 5-BIT SYNCH CHAR. NEXT, A 000 CHAR IS SENT WITH 
* EACH OF THE FULLOWING TX CHAR LENGTHS : 5 BITS, 6 BITS, 7 BITS, 8 BITS. 

* (FOR EXAMPLE, A 5-BIT CHAR REQUIRES 5 aon CYCLES TO BE TRANSMITTED). TWwO 
* TERMINATING SYNCHS ARE SENT AFTER THE D 


Ei antec wn Me ie on Boe Fa Be nth on Recto SOE PLOT CS 


SAAR REAR R ERR ERA EERE RRR ERR EREERERE ERE EH 


TEST 28 = TRANSMIT CHAR LENGTH TIMING TEST - BIT MODE, CRC 
* 


* THE LINE UNIT JS PLACED IN BIT MODE AND A MESSAGE IS INITIATED 

* WITH 2 FLAG CHARS. NEXT, 2 8-BIT 000 CHARS ARE SENT, FOLLOWED BY 000 CHARS 
* WITH EACH OF THE FOLLOWING en ie oe LENGTHS: 

* 1 BIT, 2 BITS, 3 BITS, 4 BITS, 5 BITS, 6 BITS, 7 BITS. AND 8B 

* (FOR EXAMPLE, A 5-BIT CHAR REQUIRES 5 Crock CYCLES TO BE TRANSMITTED) . 

* TWO TERMINATING FLAGS ARE SENT AFTER THE DATA. 


FREAK EEEEKAK ERE EKER EA ERA EEEREERAEAEEEA EEE ED 
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"TEST 29 = TXDATA BIT TEST - CHAR MODE, NO CRC 


THE LINE UNIT IS INITIALIZED AND A MSG IS INITIATED (USING STEPLU) WITH CRC- 
16 SELECTED IN CHAR MODE. TWO SYNCHS, 000,125.,252.377.000, AND 2 TERMINATING 
SYNCHS ARE THEN SENT. THE PROGRAM CHECKS EACH BIT OF THE TRANSMITTED 

DATA CHARS, BY MONITORING TXDATA (REG 17) AS THE DATA IS CLOCKED OUT OF 

THE USYRT TRANSMITTER 


PTT TETOTITTT TET TTTTTTITTTILE TITEL TTT 


a 


ee ee ee eee ee 


D 3 
CZDMRB y-oa®: STATIC DIAG #1 MACRO VO3.01 17-OCT-79 08:49:54 PAGE 5-8 SEQ 29 
PROGRAM DOCUMENT ‘ 
457 
458 
459 
460 
461 RRR E REET EEE AE EERE Ree 
Pe TEST 30 = USYRT RECEIVER MSG TEST = CHAR MODE, CRC 
464 * « THE LINE UNIT +e INITIALIZED AND A MESSAGE IS INITIATED (USING awh e WITH 
465 * LULP (REG 12) SET TO LOOP THE DATA Re tg IN THE USYRT, AND WITH CRC-16 
466 * SELECTED. Two SYNCHS, 000.125,252,377,000, AND FOUR TERMINATING SYNCHS ARE 
467 * SENT. THE PROGRAM MONITORS IACT. AND THE RCV'D CHARS AND CRC BYTES ARE READ 
468 * FROM AXO-15 AND COMPARED TO EXPECTED VALUES. THE PROGRAM THEN CHECKS FOR IACT 
469 * STILL SET AFTER THE MESSAGE. 
479 RARER EERE EERE RARER ERR EERE EERE REAR R ERATE EERE ER ER ER RRR 
471 
472 
473 
474 
475 
476 RRR REECE EERE ERE EEE REE RR ERR ERE A REE REE R RRR EE EE 
427 TEST 31 = USYRT RECEIVER MSG TEST - BIT MODE, CRC 
* 
479 * THE LINE UNIT IS INITIALIZED AND A MESSAGE IS INITIATED (USING STEPLU) WITH 
480 * LULP (REG 12) SET TO LOOP THE DATA_INTERNALLY IN THE USYPT, AND WITH CRC- 
481 * CCITT-1. TWO FLAGS, 000,125,252,377,000, AND Two TERMINAT ING FLAGS ARE THEN 
482 * SENT. THE PROGRAM MONITORS IACT. RSOM, AND THE RCV'D CHARS ARE READ 
485 * FROM AXO-15 AND COMPARED TO EXPECTED VALUES. THE PROGRAM THEN CHECKS FOR 
484 * JACT = 0, SETS IC TO CLEAR THE RECEIVER, AND CHECKS FOR IACT STILL = O. 
485 RARER EERE EERE REE REE ERR EERE REAR EEE REE EE AREER REE ERE EERE Ee 
486 
487 
488 
489 
490 
491 LER ERRERERREREREREER ARERR REE EEE RAE REA ETRR EER EER ERE 
Pe TEST 32 - USYRT RECEIVER MSG TEST - CHAR MODE, NO CRC 
494 * * THE LINE UNIT IS INITIALIZED AND A MESSAGE IS INITIATED (USING STEPLU) WITH 
495 * LULP (REG 12) SET TO LOOP THE DATA INTERNALLY IN THE USYRT, AND WITH NO 
496 * ERROR DETECTION. TWO SYNCHS, i. 125,252,377,000, AND TWO SYNCHS ARE 
497 * THEN SENT. THE PROGRAM MONITORS [ACT, AND THE RECEIVED CHARS ARE READ FROM 
498 * AXO-15 AND COMPARED TO EXPECTED VALUES. THE PROGRAM THEN CHECKS FOR IACT 
499 * STILL = 0, SETS IC TO CLEAR THE RECEIVER, AND CHECKS FOR IACT = 0 
500 REE RRR R ERE REE ER ERA EERE RARER EEE R ERR ERE 


LARA AAEAAAAAAAARAAARAERAEARRARAAAKEAERAAERAEAAAEAARARAAAEAAARARAEAERAARERERERA REED 


TEST 33 = USYRT RECEIVER MSG TEST - BIT MODE, NO CRC 
THE LINE UNIT 3 INITIALIZED AND A MESSAGE IS pling 3 ape STEPLU) WITH 


LULP (REG 12) SET TO LOOP THE DATA INTERNALLY IN THE U AND WITH ERROR 
DETECTION INHIBITED. TWO FLAGS, 000,125,252,377,000, AND ri TERMINATING FLAGS 
ARE THEN SENT. THE PROGRAM MONITORS IACT, RSOM, AND THE RCV'D CHARS ARE 

READ FROM AXO-15 AND COMPARED TO EXPECTED VALUES. THE PROGRAM THEN CHECKS FOR 
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514 * JACT = 0, SETS IC TO CLEAR THE RECEIVER, AND CHECKS FOR JACT STILL = O. 
515 PRRRRAR ARERR ARERR RARER REE RE ERATE AEE R REE REE ERRE EER H EKER R REE R ERA Re RE REE eee 
516 
517 
518 
519 
520 
521 PRE EEERRRAEEREEE EERE ERE REE EEE ERE EERE ETE ETT EERE RTE E TTR eee 
os¢ TEST 34 = SILO=-DISABLED TRANSMITTER LOAD TEST 
* 
524 * THIS TEST DISABLES THE SILOS, LOADS A 125 CHARACTER INTO THE TX SILO, AND 
a2 * rt it AND CHECKS THAT THE DATA DID NOT GET LOADED INTO THE USYRT TX 
* 
S27 - pene eenanialrataeiainnndsennnistinamibtedelinnanannnineunnaehsannnbinanennnianiniatin, 
528 
529 
530 
531 
532 
533 IOI IORI ISIOIOIUISIIIOIIIDIOIIUISIUIDIIDIOIUIOIIUIOISIOIUIDIOISIOIUIDIDISIOIUIOISIDIOIOIUIDISIDISIIIDIIDIIDIOIIO OR tt 
534 TEST 35 = SILO-DISABLED MESSAGE TEST - BIT MODE, NO CRC 
* 
536 * THE LINE UNIT IS INITIALIZED AND A MESSAGE IS INITIATED (USING STEPLU) 
537 * WITH LULP (REG 12) SET TO LOOP THE DATA INTERNALLY IN THE USYRT, WITH SILO 
538 * DISABLE SET, AND WITH NO ERROR DETECTION. TWO FLAGS, 000,125,252, AND 
539 * TERMINATING FLAGS ARE THEN SENT BY LOADING THE TRANSMITTED CHARS INTO 
540 * REG AX1. THE PROGRAM MONITORS OACT, IACT, RSOM, REOM, ORDY, OCOR, ICIR, 
oft * IRDY . AND THE RECEIVED CHARS ARE READ FROM AX0O AND COMPARED TO EXPECTED 
543 asada trast iguiiouiaa teenie hs teintandiannaeneensieeisiinasnennnndigataies 
544 
545 
546 
547 
548 
549 DR RRR ERR REE EERE EERE ERE REAR ERE E RE REREE ERR E 
ey TEST 36 - RECEIVER BUFFER TEST - CHAR MODE, CRC 
* 
552 * FIRST, A MASTER CLEAR IS DONE AND pie PROGRAM CHECKS FOR ICIR = 1 AND IRDY 
553 * EN, OM CHARS ARE LOADED AND CLOCKED INTO THE USYRT, AND 64 
eee * BYTES OF A 256-BYTE BINARY COUNT DATA PATTERN (000-377) ARE LOADED INTO 
* TH 
556 * THE LINE UNIT IS THEN CLOCKED UNTIL IRDY = 1, AND THE PROGRAM CHECKS FOR 
557 * THIS TO OCCUR WITHIN 40-43 CYCLES. THE PROGRAM READS THE RCV SILO, CHECKS THE 
558 * CHAR FOR AND CHECKS FoR IRDY = 0 AGAIN. 
559 * THE LINE UNIT IS THEN CLOCKED IN GROUPS OF 8 CYCLES, AND AFTER EACH, THE 
560 * PROGRAM CHECKS FOR ICIR = 1, IRDY = 1, UNTIL THE 64TH GROUP, AFTER WHICH 
561 * IT CHECKS FOR ICIR = 0, IRDY = 1. THE SECOND DATA CHAR IS READ FROM THE 
562 * RECEIVER SILO AND COMPARED TO 001. THEN, THE PROGRAM CHECKS FOR ICIR = 1, 
563 * IRDY = 1 AGAIN. 
564 * THE REST OF THE BINARY COUNT DATA BYTES ARE CYCLED 8 CLOCKS AND READ AND 
565 * COMPARED A BYTE AT A TIME. 
566 PERE EERE EERE EERE EERE ERE EAE AREER ER ERR AREER ER REE 
567 
568 
569 
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71 
x4 FERRARA AAAAAARARAARAKAAAREARARAAAAARERAAAHRREREERAEREERERAARAERERAERERAEAH ERA A EES 
ao TEST 37 = RECEIVER CHAR LENGTH TIMING TEST = CHAR MODE, NO CRC 
we 

575 * THE LINE UNIT IS PLACED IN CHAR MODE, WITH NO ERROR DETECTION, AND A MSG IS 
576 * INITIATED WITH 2 SYNCH CHARS. NEXT, FIFTEEN 000 CHARS ARE LOADED INTO THE 

577 * TRANSMITTER SILO. THE LINE UNIT IS’THEN CLOCKED USING STEPLU WITH LULQOP 

578 * SET, WHILE THE RECEIVER CHAR LENGTH IS SET TO THE FOLLOWING VALUES : 5,6,7,8. 
579 * FOR EACH RCV CHAR LENGTH, THE PROGRAM CHECKS TO MAKE SURE THET USYRT RECEIVER 
580 * FLAGS OCCUR THE PROPER NO. OF CYCLES APART, FOR EACH RCV CHAR LENGTH 

581 * (FOR EXAMPLE A 5-BIT CHAR TAKES 5 CLOCK CYCLES TO BE RECEIVED). A MASTER 

582 * CLEAR IS THEN DONE TO TERMINATE THE OPERATION. 

583 FERRARA ARAAARAAHAARAKARRAAAARAEAARKAERREARAKEHARARAARERAEEREREAAERAKEEARRRAARRREEE HED 
584 

585 

586 

587 
588 
589 LEAR AEE E REAR AAERAEAREERARRAERAAKERARERRARAERARAAERRAHERAERAARAEREARRAEERER EERE ES 
590 TEST 38 = RECEIVER CHAR LENGTH TIMING TEST - BIT MODE, NO CRC 

592 * THE LINE UNIT IS PLACED IN BIT MODE WITH NO ERROR DETECTION, AND A MESSAGE IS 
593 * INITIATED WITH 2 FLAG CHARS. NEXT, FIFTEEN 000 CHARS ARE LOADED INTO THE 

59% * TRANSMITTER SILO. THE LINE UNIT IS THEN CLOCKED USING STEPLU WITH LULOOP 

595 * SET, WHILE THE RCV CHAR LENGTH IS SET TO THE FOLLOWING VALUES : 8.8,8-7.6.5, 
596 * 4.3.2.1. FOR EACH RCV CHAR LENGTH, THE PROGRAM CHECKS TO MAKE SURE THAT THE 
597 * USYRT RECEIVER FLAGS OCCUR THE PROPER NO. OF CYCLES APART, FOR EACH RCV 

598 * CHAR LENGTH. (FOR EXAMPLE, A 5 BIT CHAR TAKES 5 CLOCK CYCLES TO BE RECEIVED). 
599 * A MASTER CLEAR IS THEN DONE TO TERMINATE THE OPERATION 

600 RRA RARE RRR RRR RR RRR RRR RRR R RRR R RRR RR RRR RR ERR ERROR AREER EERE ERE 
601 

602 
603 
(™, 
6U5 
606 J TAAAAAARAAAAARERAKEERAERERARAEEAERREAERARERAERRERREARAARARAAARARAAAAAAREAEEREKEEHE KEES 
607 TEST 39 = TRANSMITTER UNDERRUN ERROR, IDLE MARKING, CHAR MODE,NO CRC 
609 * THE LINE UNIT IS PLACED IN CHAR MODE, AND THE IDLE BIT IS SET. THEN, A 

610 * MSG IS INITIATED, A 000 CHAR IS SENT, AND THE TX BUFFER IS NOT SERVICED 

611 * IN RESPONSE TO THE USYRT TX BUFFER EMPTY FLAG, WHICH CAUSES A TX UNDERRUN 

612 * ERROR. THEN, THE RECEIVER IS CLOCKED AND CHECKED FOR TWO 377 CHARS TO BE 

613 * RECEIVED (LINE MARKING) BEFORE SHUTTING DOWN WITH A MASTER CLEAR. 

614 TEAR AREER RARER REARAERAEREERAEAEERAERAREKEERERER EERE RRR AEE 
615 

616 
617 
618 
619 
620 FTAAARAAAAAAAARAAAAAAAAEEARAEARAAEKEAEAEAARERAERAERHEEAERERNRKEHEA REE eReeee 

621 TEST 40 = MSG TERMINATION WITH GA CHARS - BIT MODE,NO CRC 

623 * THE DEVICE IS ENABLED FOR TRANSMIT AND RECEIVE, AND A MESSAGE IS 

624 * INITIATED IN BIT MODE. 

625 * 2 FLAG CHARACTERS ARE SENT, FOLLOWED BY 

626 * THE FOLLOWING DATA CHARACTERS : 000, 125, 252, 377. 000. THEN THE LOOP 


627 * MODE BIT (STRIP) IS SET AND 2 TERMINATING GO-AHEAD CHARACTERS ARE 
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MACRO VO5. 


see ee 


* 
* 
* 
* 
* 
® 
® 
* 
* 
* 


see eneepeeeeeeee 


* 


SENT. EACH USYRT RCV FLAG IS TIMED AS IT IS RECEIVED, AND THE 5 DATA 
WORDS ARE READ AND COMPARED TO EXPECTED VALUES. 

ALSO, THE FIRST GA CHAR IS CHECKED ‘3 SCANNING THE TXDATA BIT AS THE GA 
1S BEING TRANSMITTED (GA = 376 OCTAL 

THE TEST ALSO CHECKS FOR SETTING OF RAB AND EBiK 

IN LOOP MODE. 


J EARAAAAAARAAAARARAAAERARARERARAAARERARAAERRAAERRARRAARRERHHEARHREERERERED 


FERRARA RAAARAKARAAEAARAARERAAARRRARARAEERERAERARAERAERERERAEAERARRAER EES 


TEST 41 = IDLE SYNCHS TEST = CHAR MODE 


THE DEVICE IS ENABLED FOR TRANSMIT AND RECEIVE, AND A MESSAGE IS 
INITIATED IN CHAR MODE. 24(DEC) SYNCHS ARE SENT. 

EACH SYNCH IS TIMED AS IT IS RECEIVED, AND THE BITS ARE CHECKED 
FOR A VALID SYNCH CHAR FOR EACH OF THE 22 SYNCHS WHICH FOLLOW 

THE FIRST TWO (THESE PERFORM SYNCHRONIZATION, AND ARE a — 
WHILE THE LAST SYNCH IS BEING TRANSMITTED, OC IS SET. THE 

NEXT CHAR RCV'D AFTER THE SYNCH IS CHECKED TO BE 377 (LINE MARKING). 
THEN, A MASTER CLEAR IS_ ISSUED. 

THE SYNCH CHAR USED IS 226 (OCTAL). 


SERA AARAAAAEAARARAERAEAERAERERRAEREREERAEERARAERERAERRARAAEAAERAEARAARERERARHAREREEESE 


eR RARER AARRERERAAREAAEAAAARAERAARAAREREREEREERERER ERE RERee Ree e ee 


TEST 42 - STRIP SYNCH TEST 


THE DEVICE IS ENABLED FOR TRANSMIT AND RECEIVE, AND A MESSAGE IS 
INITIATED IN CHAR MODE AND WITH THE STRIP SYNCH 

BIT SET. THEN 24 (DEC) SYNCHS ARE SENT 

FOLLOWED BY THE FOLLOWING DATA CHARACTERS : 377, 000, 125, 252, 

AND THEN 2 TERMINATING SYNCHS. 

EACH OF THE 23 SYNCHS AFTER THE FIRST ARE CHECKED AT THE TRANSMITTER GUTPUT, 
BY SCANNING THE TXDATA BIT. 

EACH USYRT RCV FLAG IS TIMED AS IT oe RECEIVED, AND THE 4 DATA WORDS 
ARE READ AND COMPARED TO EXPECTED VALUES. 

FINALLY, THE LINE Ay IS CLOCKED FOR SEVERAL CHAR TIMES, AND A CHECK 
1S MADE FOR OACT = 0 (TEOM SHOULD CAUSE TX ENABLE TO DROP). 

THE ABOVE TEST IS REPEATED FOR EACH OF THE FCLLOWING SYNCH CHAR DATA 
PATTERNS : 226,000,125,252,376,177. 


PUPTITI TTI TITITT TTT TTT TI TIT T TT TTT TTI TILT TTLLTLTTLL TT TTT 


8.1 DATA PATTERNS USED 


eeee DATA PATTERN A eunee 


G 3 | 
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CZDMRB M82 
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685 
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PATA: 


aeaee 


PATB: 


weeane 


PATC: 


aeene 


PATD: 


egeene 


PATE: 


aeenre 


PATF: 


BYTF 125 
BYit 252 
-BYTE 000 
-BYTE 377 
-BYTE 001 
-BYTE 002 
-BYTE 004 
-BYTE 010 
-BYTE 020 
-BYTE 040 
BYTE 100 
-BYTE 200 
BYTE 376 
-BYTE 375 
-BYTE 373 
BYTE 367 
BYTE 357 
BYTE 337 
.BYTE 277 
-BYTE 177 
DATA PATTERN B 
-BYTE 000 
-BYTE 000 
BYTE 040 
-BYTE 100 
-BYTE 220 
-BYTE 000 
-BYTE 000 
BYTE 051 
DATA PATTERN C 
-BYTE 020 
-BYTE 020 
-BYTE 020 
DATA PATTERN D 
-BYTE 000 
-BYTE 040 
-BYTE 000 
DATA PATTERN £ 
-BYTE 000 
-BYTE 120 
-BYTE 9020 
-BYTE 100 
BYTE 120 
-BYTE 000 


DATA PATTERN F 
050. 


-BYTE 


weene 


aeane 


wreanne 


xeeane 


weeane 


ee 


SEQ. 38 
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MACRO v03.01 17-0CT=79 08:49: 


eenee 


PATG: 


eeeee 


PATH: 


eaeaeake 


PATI: 


canker 


PATJ: 


xeene 


PATK: 


-BYTE 051 
-BYTE 050 
DATA PATTERN G 
-BYTE 009 
-<BYTE 000 
BYTE 240 
«BYTE 120 
-BYTE Aer 
-BYTE 000 
-BYTE 000 
-BYTE 001 
DATA PATTERN H 
-BYTE 000 
-BYTE 000 
-BYTE 377 
-BYTE 017 
«BYTE 377 
-BYTE 377 
«BYTE 375 
-BYTE 377 
DATA PATTERN I 
-BYTE 000 
-BYTE 000 
-BYTE 000 
-BYTE 000 
-BYTE 000 
-BYTE 103 
-BYTE 000 
-BYTE 000 
DATA PATTERN J 
-BYTE 000 
-BYTE 000 
BYTE 010 
-BYTE 002 
-BYTE 004 
-BYTE 103 
-BYTE 001 
-BYTE 100 
DATA PATTERN K 

YTE 000 
-BYTE 000 
-BYTE 377 
-BYTE 377 
-BYTE 125 
-BYTE 125 
-BYTE 252 
-BYTE 252 
-BYTE 001 


I 3 
54 PAGE 5-13 SEQ 4834 


-_ 


xenee 


aanee 


eeene 


xrkeke 


weeene 


i 35 
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PROGRAM DOCUMENT 


799 -BYTE 000 
800 BYTE 002 
801 BYTE 000 
802 BYTE 4 
803 BYTE 000 
804 BYTE 010 
805 BYTE 000 
806 BYTE 020 
807 BYTE 000 
808 BYTE 040 
809 BYTE 000 
810 -BYTE 1 
811 -BYTE 000 
812 -BYTE 200 
813 -BYTE 000 
814 -BYTE 000 
815 -BYTE 001 
816 -BYTE 000 
817 -BYTE 002 
818 -BYTE 000 
819 -BYTE 4 
820 -BYTE 000 
821 -BYTE 010 
822 -BYTE 000 
-BYTE 020 
4 -BYTE 
825 -BYTE 040 
826 -BYTE 
827 -BYTE 100 
828 -BYTE 000 
-BYTE 200 
830 -BYTE 376 
831 -BYTE 377 
832 -BYTE 375 
833 «BYTE 377 
834 -BYTE 373 
835 -BYTE 377 
-BYTE 367 
837 -BYTE 377 
838 -BYTE 357 
839 -BYTE 377 
840 -BYTE 337 
841 -BYTE 377 
842 -BYTE 277 
843 -BYTE 377 
844 -BYTE 177 
845 -BYTE 377 
846 -BYTE 377 
847 -BYTE 376 
848 -BYTE 377 
849 -BYTE 375 
850 -BYTE 377 
851 BYTE 373 
852 -BYTE 377 
853 -BYTE 36 
854 .BYTE 377 


-_ 


A 
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5 5 
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aeaeeee 


xektane 


tewane 


-BYTE 377 
BYTE 337 
-BYTE 377 
-BYTE 277 
-BYTE 377 
BYTE 177 
sanee DATA PATTERN L 
-BYTE 000 
-BYTE 000 
.BYTE 377 
-BYTE 377 
-BYTE 000 
-BYTE 000 
weeee DATA PATTERN M 
PATM: 
-BYTE 000 
-BYTE 020 
-BYTE 000 
.BYTE 000 
-BYTE 200 
-BYTE 000 
-BYTE 000 
-BYTE 051 
t**** DATA PATTERN N 
PATN: 
-BYTE 000 
-BYTE 000 
-BYTE 125 
-BYTE 000 
-BYTE 252 
-BYTE 000 
.BYTE 377 
-BYTE 005 
-BYTE 000 
-BYTE O12 
-BYTE 000 
.BYTE 017 
-BYTE 000 
xeaee DATA PATTERN 0 «#8 
PATO: 
-BYTE 000 
-BYTE 041 
BYTE 004 
-BYTE 010 
-BYTE 020 
-BYTE 100 
-BYTE 101 
-BYTE 200 
.BYTE 201 
-BYTE 300 


SEQ 
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BYTE 117 
BYTE 301 
BYTE 375 
eeeee DATA PATTERN P eeene 
PATP: 
BYTE 900 
BYTE 13 
-BYTE 200 
BYTE 0 
BYTE 020 
BYTE 010 
BYTE 001 
BYTE 104 
BYTE 007 
BYTE 105 
BYTE 7 
BYTE 144 
BYTE 107 
BYTE 157 
aaeee DATA PATTERN U *xee8 
PATU: -BYTE 000 
BYTE 001 
BYTE 
BYTE Q13 
BYTE 000 
BYTE Q11 
BYTE 0 
BYTE 021 
-BYTE 
BYTE 101 
-BYTE 
-BYTE 301 
BYTE 
BYTE 001 
BYTE 000 
-BYTE 002 
BYTE 000 
-BYTE 004 
BYTE 000 
BYTE 000 
BYTE 100 
BYTE 
-BYTE 200 
-BYTE 000 
BYTE 346 
-BYTE 000 
BYTE 345 
BYTE 000 
BYTE 343 
BYTE 000 
BYTE 307 
BYTE 000 


SEQ 


37 


—— 
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BYTE 247 
-BYTE 000 
-BYTE 147 
exee® DATA PATTERN V teaee 
PATV: -BYTE 000 
-BYTE 0 
BYTE 333 
BYTE 0O 
BYTE 331 
BYTE 323 
BYTE 000 
BYTE 313 
BYTE 233 
-BYTE 
BYTE 133 
BYTE 000 
BYTE 000 
BYTE 001 
-BYTE 000 
-BYTE 002 
-BYTE 
BYTE 004 
-BYTE 
BYTE 040 
-BYTE 
BYTE 100 
BYTE 000 
BYTE 200 
BYTE 000 
BYTE 346 
-BYTE 
BYTE 343 
-BYTE 
-BYTE 307 
-BYTE 
BYTE 247 
BYTE 000 
BYTE 147 


SEQ 
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OW NA UAW OO OONAUMEWN 


VV 
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9.0 ERROR INFORMATION 


9.1 EROR REPORTING 


ERRORS ARE REPORTED BY THE PROGRAM AS THEY OCCUR (IF NO? 
INHIBITED). THE REPORT CONFORMS TO THE DIAGNOSTIC SUPERVISOR 
ERROR REPORT FORMAT, AND CONSISTS OF A DESCRIPTION OF THE 
ERROR, THE TEST NUMBER, SUBTEST NUMBER, PC OF THE ERROR 
CALL, DEVICE ADDRESS, AND BASIC AND EXTENDED ERROR 
INF ORMAT ION. 


THE FOLLOWING EXAMPLE PROVIDES A TYPICAL ERROR REPORT, WHICH 
DESCRIBES AN ‘“‘IRDY NOT SET*’ ERROR, AND PROVIDES THE PC OF 
THE ERROR CALL AND THE PC OF THE CALL TO THE SUBROUTINE 
cee IT, THE FAILING REGISTER NAME, AND DEVICE REGISTER 


39 


CZDMR ot ERR 00017 ON UNIT 00 TST 034 SUB 000 PC: 006210 


IRDY NOT 

PC OF SUBR CALL: 030044 

DEVICE CSR ADDRESS : 160170 
FAILING REG: INBUS/OUTBUS REG 12 


LINE UNIT INBUS REGS: 
REGIO. REGI1 REGI2 REG13 
000 120 000 7 


REG14 REGIS REGI6  REG17 
024 377 377 035 
LINE UNIT EXTENDED REGS: 
AX0-15 AX0-16 AX1-15 AX1-16 
000 000 000 

AX2-15 AX2-16 AX3-15 AX3-16 

000 000 000 000 
FOR OTHER ERRORS, THE REPORT MAY BE MORE EXTENSIVE, AND 
REQUIRE ADDITIONAL DATA TO BE REPORTED. 
IF EXTENDED ERROR INFORMATION HAD BEEN INHIBITED USING THE 


IXE FLAG PRIOR TO RUNNING THE TEST, THE ABOVE ERROR WOULD 
HAVE BEEN REPORTED IN THE FOLLOWING SHORTENED FORM : 


CZDMR DVC FTL ERR 00017 ON UNIT 00 TST 034 SUB 000 PC:006210 


IRDY NOT SET 

PC OF SUBR CALL: 030044 

DEVICE CSR ADDRESS : 160170 
FAILING REG: INBUS/OUTBUS REG 12 


aon 


CZDMRB M8203 S 
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NT 


B 4 
MACRO VO3.01 17-O0CT=79 08:49:54 PAGE 6-1 


SEQ 


40 


a 
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PROGRAM DOCUMENT 


1 .TITLE CZDMRB M8203 STATIC DIAG #1 

10 002000 .=2000 

12 

13 

14 

15 

16 

17 .MCALL SVC 

18 002000 SVC : INITIALIZE SUPERVISOR MACROS 
20 

21 

22 

23 

24 2000 BGNMOD LUIMOD 

26 

27 000001 $LSTIN= 1 

28 000001 $LSTTAG= 1 

29 000001 SVCINS= 1 : LIST INSTRUCTIONS, SHIFTED RIGHT 

30 000001 SVCTST= 1 ; LIST TEST TAGS, SHIFTED RIGHT 

31 000001 SVCSUB= 1 : LIST SUBTEST TAGS, SHIFTED RIGHT 

32 000001 SVCGBL= 1 ; LIST GLOBAL TAGS, SHIFTED RIGHT 

33 000001 SVCTAG= 1 : LIST OTHER TAGS, SHIFTED RIGHT 

35 : CHANGE THE VALUES OF THE SVC... SYMBOLS TO BE ZERO IF YOU WISH 
3% TO ALIGN THE MACRO CALLS AND THEIR EXPANSIONS. CHANGE THE 
37 ; SYMBOLS TO BE MINUS-ONE TO NOT LIST THE EXPANSIONS. YOU MAY 
38 : CHANGE THE SYMBOLS AT ANY POINT IN YOUR PROGRAM. 








CZDMRB M8203 STATIC DIAG #1 
PROGRAM HEADER 
1 
2 
3 
4 
5 
6 
7 002000 
10 
11 
12 
13 
14 
16 
17 002000 
002000 
002000  —«-103 
002001 132 
002002 =: 104 
002003 =: 115 
002004 122 
002005 000 
002006 000 
002007 «000 
002010 
002010 102 
002011 
002011 060 
002012 
002012 000000 
002014 
002014 000055 
002016 
002016 035530 
002020 
2020 000000 
002022 
002022 002252 
002024 
002024 000000 
002026 
2026 036206 
002030 
2030 000000 
002032 
002032 000000 
2034 
002034 000000 
002036 
002036 000000 
002040 
002040 002124 
002042 
002042 000000 
002044 
602044 000000 
002046 


dD 4 
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-SBTTL PROGRAM HEADER 


fa 
; THE PROGRAM HEADER IS THE INTERFACE BETWEEN 
; THE DIAGNOSTIC PROGRAM AND THE SUPERVISOR. 


‘_—— 
. 


POINTER BGNAU,BGNDU 


oo 09909 9909999778588 8587855909599 5 9798859975989 8 88887878887 
; IF ANY OPTI POINTERS ARE TO BE USED IN THE ‘HEADER'’, CHANGE 


ONAL 
"POINTER’’ TO CONTAIN THE CORRECT ARGUMENTS. 


IF ALL 


HEADER (CZDMR,B,0,45.,0 


: OPT TONAL 
: POINTERS ARE TO BE USED, CHANGE ‘POINTER’ TO BE ‘POINTER AL 
45545545545544544544544544545544544544544454054454444454455455451 


LSNAME : : 

-ASCII 

ASCII 

ASCII 

ASCII 

ASCII 

BYTE 

BYTE 

-BYTE 
LSREV:: 

-ASCII 
LSDEPO: : 

ASCII 
LSUNIT:: 

. WORD 
LSTIML:: 

. WORD 
LSHPCP:: 

.~ WORD 
L$SPCP:: 

. WORD 
LSHPTP:: 

. WORD 
LSSPTP:: 

. WORD 
LSLADP: : 

. WORD 
LSSTA:: 

WORD 
L$CO:: 

. WORD 
LSDTYP:: 

. WORD 
LSAPT:: 

. WORD 
LSDTP:: 

. WORD 
L$PRIO:: 

. WORD 
LSENVI:: 

. WORD 


LSEXP1:: 


WAAATALALAAAAANX 


LSLAST 

0 

9 

0 

0 
LSDISPATCH 
0 

0 


~~ 


CZDMRB 9 tie DIAG #1 


PROGRAM HEADER 


RRNWNWOOR 
SHEMNOO 


021606 
021524 
000000 
003470 
104035 
000000 
021072 
021522 
021442 
021064 
000000 
000000 
000000 


E 4 
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LSMRE.':: 


LSEF:: 


LSSPC:: 
LSDEVP:: 
LSREPP: : 
LSEXP4:: 
LSEXPS:: 
LSAUT:: 
L$DUT:: 
LSLUN:: 
LSDESP:: 
LSLOAD: : 
LSETP:: 
LSICP:: 
LSCCP:: 
LSACP:: 
LSPRT:: 
LSTEST:: 
LSDLY:: 
LSHIME:: 


0 
ests! 
; 

0 
LSDVTYP 
0 

0 

0 

L$AU 
L$DU 

0 
LSDESC 
ESLOAD 
0 
LSINIT 
LSCLEAN 
LS$AUTO 
LSPROT 
0 

0 

0 


[""naaat ht “Ee” TE tagkin tt ee eT Tee 
LAE AAA A AEA A AAA LALA A LALA ALK 


EVEN 


~ = 
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DISPATCH TABLE 


1 


2 
3 
4 
5 
6 
7 
8 


md and nh ed 
wre oa 


000052 
021610 


035264 


F 4 
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-SBTTL DISPATCH TABLE 


SAI 
3:7 THE DISPATCH TABLE CONTAINS THE STARTING ADDRESS OF EACH TEST. 

:/ IT 1S USED BY THE SUPERVISOR TO DISPATCH TO EACH TEST. 

SAPLIIILILITTITTATATTT TATA TAT TATA LTT AITT IATA 


DISPATCH 42 


«WORD 42 
LSDISPATCH:: 

«WORD TI 
«WORD [2 
-WORD 13 
«WORD 14 
«WORD 15 
-WORD 16 
«WORD 17 
-WORD 18 
«WORD T9 
-WORD 110 
«WORD 111 
«WORD T12 
-WORD 113 
-WORD 114 
«WORD 115 
-WORD 116 
«WORD 117 
«WORD 118 
«WORD 119 
-WORD 120 
-WORD T21 
«WORD T22 
-WORD 123 
-WORD 124 
«WORD 125 
-WORD 126 
«WORD T27 
-WORD 128 
«WORD T 
-WORD 130 
-WORD 131 
-WORD T32 
-WORD 133 
-WORD 134 
-WORD 135 
-WORD 136 
-WORD 137 
-WORD 138 
-WORD 139 
-WORD 140 
-WORD 141 
«WORD 142 


Lee UALR AAA A AAA A ALAA AA% 
: CHANGE THE ARGUMENT OF ‘DISPATCH'' TO BE THE 


: NUMBER OF HARDWARE TESTS IN YOUR PROGRAM. 
eee AAA UAE AEA AAA A LAAN 
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~~ 
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CZDMRB M8203 STATI. DIAG #1 
DEFAULT HARDWARE ?=T ABLE 


i. 10000: 


, .SRBTTL DEFAULT HARDWARE P=-TABLE 

3 SALTITILASTATTIDALTAAATTTAAAT TATA T TATA ATTA TA TATA TTA PTA LALA AAAS 

4 ;/ THE DEFAULT HARDWARE P-TABLE CONTAINS DEFAULT VALUES OF 

5 3/7 THE TEST=DEVICE PARAMETERS. THE STRUCTURE OF THIS TABLE 

6 */ 1S IDENTICAL 7G THE STRUCTURE OF THE RUN-TIME P=TABLE. 

: SAASIILIIIITTATITTTAATATTATLTITDTTATAADAATASATATAATPA TA TT ATTA TAAA LATA 

9 002250 BGNHW DFPTRL 
002250 000013 -WORD 110000-1 $Hw/2 
002252 L$HW: : 

10 002252 DFPTBL:: 

11 002252 0000. 7 . WORD 7 :MICROPROCESSOR TYPE = M8207 

12 002254 160170 . WORD 160170 *DMC11 OR KMC11 CSR UNIBUS ADDRESS 

13 002256 .~WORD DMC11 OR KMC11 INTERRUPT VECTOR 

14 002260 005000 . WORD 5000 DMC11 OR KMC11 INTERRUPT PRIORITY LEVEL = 5 

15 002262 000003 . WORD ;LINE UNIT = M8203 

16 002264 000056 . WORD 056 :SWITCH PACK #1 (REG 11) 

17 002266 000000 . WORD 000 : SWITCH PACK #2 (REG 15) 

18 002270 000000 . WORD 000 sSWITCH PACK #3 (REG 16) 

19 002272 000000 . WORD 0 3H32548H3255 USED 

20 002274 006004 . WORD 4 :BAUD RATE = 56 K 

$3 002276 000001 . WORD 1 ;RUN SWITCH ON MICROPROCESSOR IS ON 


SEQ 46 | 












— 
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-SBTTL SOFTWARE P-TABLE 


SSATATITITLTTIATAATAAT LATA ATAT ATTA TTA ATTA T ATTA TAAL A DATA A AAS 
3/7 THE SOFTWARE P=TABLE CONTAINS THE VALUES OF THE PROGRAM 

;/ PARAMETERS THAT CAN BE CHANGED BY THE OPERATOR. 
SAAIITITIATTATTTATITA SAIS TAST LATTA TTT TAT ATA ASAT STIS ASS 


BGNSW ss SFPTBL 
WORD 
L$Sw:: 


SFPTBL:: 


ENDSW 
L 10007: 


L10001=1 $Sw/2 


an 
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CZDMRB 
SOF TWARE P=TABLE 





1 
2 
3 
4 
5 
6 
? 
8 
9 
i 
12 .SBITL GLOBAL EQUATES SECTION 
14 
15 SAIIIITITIIALIAATAAIA SAAT ALATA TAEDA ATTA AAAS AEDT AAAS 
16 :/ THE GLOBAL EQUATES SECTION CONTAINS PROGRAM EQUATES THAT 
17 t/ ARE USED IN MORE THAN ONE TEST 
4 SO AIULIALTAATTLUATILTLTAILALELPAEL TPL OLATLALALTALAT LALLA TTTT LAUT 
20 002302 EQUALS 
> BIT DIFINITIONS 
100000 B1T15== 100000 
040000 BIT14== 40000 
020000 BIT13== 20000 
010000 BIT12== 10000 
004000 BIT11== 4000 
002000 BIT10== 2000 
001000 BITO9== 1000 
00 BITOB== 400 
000200 BITO7== 200 
000100 1T06== 100 
0 BITOS== 40 
000020 BIT04== 20 
000010 BITO3== 10 
000004 BITO2== 4 
000002 BITO1== 2 
000001 BITOO== 1 
001000 BIT9== BITOS 
00 BIT8== BIT08 
000200 BIT7== BITO7 
000100 BIT6== BITS 
000040 BITS== BITOS 
000020 BIT4== BIT04 
000010 BIT3== BITO3 
000004 BIT2== BITO2 
000002 BITi== BITO 
000001 BITO== BIT 
; € T FLAG DEFINITIONS 






VEN 
EF32:EF17 RESERVED FOR SUPERVISOR TO PROGRAM COMMUNICATION 















0 EF .START== ; : START COMMAND WAS ISSUED 
000037 EF.RESTART== 31. > RESTART COMMAND WAS [SSUED 
000036 EF.CONTINUE== 30. S CONTINUE COMMAND WAS 1 SSUED 








aan 






K 4 
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SEQ 9849 
GLOBAL EQUATES SECTIUN 
000035 EF .NEW== 29. ; A NEW PASS HAS BEEN STARTED 
0000 34 EF .PWR== 28. 3 A POWER=F AIL /POWER=UP OCCURRED 


S PRIORITY LEVEL DEFINITIONS 


ronnie 
_ 
rs rs 
Oo 








TOPERATOR FLAG BITS 






EVL== 4 

000010 LOT== 10 
000020 ADR== 20 
0 IDU== 40 
000100 ]SR== 100 
000200 == 200 
000400 BOE == 400 
001000 PNT == 1000 
002000 PRI== 2000 
004000 IXE== 4000 
010000 IBE== 10000 
020000 IER== 0000 
040000 LOE == 40000 
100000 HOE== 100000 






25 LEAR EER EERE ERE REE ERE REE REE RTE e eee 
7* PROGRAM EVENT FLAG DEFINITIONS 
27 LRA RRR EERE RARER EERE EERE ERE RARE EERE ER Re eee 






33 FLA ARERR AEAEAAAAREARAEAEREERAERERRAEAEAEEEEAEAEEAEAAAEAEAEREARAEEEREHERAERRARE REDE 
;* MAINTENANCE REGISTER - BSEL1 
35 J CIARA AAAA ARERR ARAEEAAERERAKEAEAAERAEARAERAERARAE AETHER REEHEE KERR EH RAE eeR Re eee eee 








LIAR ERA ERR REET EARP EER EERE ER AeA eee 


** OBUS REG 10 - TRANSMITTER BUFFER 


46 SPUR RARAERAARAEEARAERAAREKEAAAARAAAARERERERRAERARARARAERARRK EEK AR Re eee eeeReese 





am 


L 4 
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GLOBAL EQUATES SECTION 





47 000200 1X7 = BIT7 
48 000100 TX6 = BIT6 
49 000040 x5 = BITS 
50 000020 TX4 = BITS 
51 000010 Tx3 = B1T3 
52 000004 TX2 = BIT2 
53 000002 TXx1 = BIT 
zo 000901 TxO = BITO 
56 FF RARER ARAAARAAAAAAAERHAHRRERARRRAEEARARARARAAERARAEERAHERRAHERARRARAEREERRAEEEEREEEESE 
57 7* OBUS REG 11 
58 Sf REA ARARAAAARAAAERREEERARRAARRAERERAREKRAARARAERRRAEARHRAERAARAERHERAAEREAAERRHEES 
59 600200 Oc = BIT7 
60 000010 GOAH = BIT3 
61 000004 ABORT = BIT2 
62 000002 EOM = BIT] 
4 000001 SOM = BITO 
65 J FARRAR ERE REAR EEREERERERAREREAERREREERERERAEEEEREREREPHREAEEERERAEREEREE DT 
z* OBUS REG 12 
67 FF RAE AARARA AREER ARERR EEREERERREREREEEEREEE EA AEERAEAEAEAAREREARAAERAREEEREHEER EEE 
68 000200 IC = BIT7 
69 000100 BPOLL = BIT6 
y LULP = BITS 
72 JF EAA AREER EER AREER AAEAEEREREEERAREEERRETERARAEAEAAEAERAERAERAEERAH EEE EES 
73 7* OBUS REG 13 
74 FC AAAAAAAAAAEAAKAARARAAAAEAEKAAAERAEAERAAARREETAEAAEAARERAAAERAERAEEARRARAEREHRAAHERE RHEE S 
75 000200 POLL = BIT7 . 
76 000100 TR = BIT6 
77 000040 SELFR = BITS 
78 000020 HDX = BITS 
79 000010 MAINT] = BIT3 
80 MAINT2 = BIT2 
5) 000002 SELSBY = BIT1 
83 FF EAA AAAAAEAAAAEREAEEREREEEREEEEREREREREAEREEAAERAEAERERAEAAEAAREEAREAEAERRRERA AREER ES 
8&4 3* OBUS REG 14 
85 fF FAA AAARRA RAE RERAERERRAEETRAREARAEAEEAERERERAERERAERERERAEAREERERERHERE REE HEE 
000100 TXEN = BIT6 
87 000040 DISSI = BITS 
88 000020 RDAX = BIT4 
89 000010 WAX = BIT3 
000004 ENAX = BIT2 
91 000002 AX2 = BIT! 
4 000001 AX1 = BITO 
94 SPARE AAARAREAEREREAAKEEERAERERARAEAAAEATAAERAREEARAEEARAEAAAAEHAERARARHEKRR EERE EERE ES 
95 7* OBUS REG 17 
96 JF AAAAAAAAAAAAAAEEAARERREAEREAEAREREEREAEAEAEAAREEAERE HERE RAARAAREAAERRARHEHREREREA ES 
97 000200 CRC2 = BIT7 
98 000100 CRC1 = BIT6 
% 0 IDLE = BITS 
100 000620 SECA = BITS 
101 000010 STRIP = BIT3 
102 000004 RDALL = 6IT2 
103 000002 IERR = BIT1 


CZDMRB M8203 STATIC DIAG #1 


GLOBAL EQUATES SECTION 


att ad at ab ad ab ba a a a a ah oe le ee a a od a el ce eed ih a ed on 
ath cal cael cal el cel cl wld cad 
BBIFAKRUYYASVSVRAGRASVLS FOVRARANASSRLKAR 


140 


151 


ed ed ed ed nt ed ed ed 
SSBVRARAN 


000001 


mM 4 
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DDCMP = BITO 


MAAAARARAAAAALASAASLASLASAALARARARE RAS ERESERRRE RRR RARE RES RASA RE RE RE RR RRR ERS RAS ES 


t%* [BUS REG 10 = RECEIVER BUFFER 


WME RARARAAAASAALALAASLAALSLARARARR RE SSAR SRR RARER SERRE RRR RRR RRR RRR RRR RRR RRR RRR RARER RS SS 


RX7 = BIT7 
RX6 = BIT6 
Rx5 = BITS 
RX4 = BITS 
RXx3 = B1T3 
RX2 = BIT2 
RX1 = B1T1 
Rx0 = BITO 


FF AAA AARAAERARAAERARAAEARRERAERARARRERARERERERERRERARRERARAEAEEAREAAERERRERHAREEES 


:* IBUS REG 11 


SG AAA AAAAAAAEAARAARARAEARARARERAREERARERAEERRERREAEORRAE HARARE ERAEARAERERHEARAAAAA Ae 


oc = BIT 

OACT = BIT6 
Sw3 = BITS 
ORDY = BITS 
SwW2 = BITS 
Sw = BIT2 
SwO = BIT) 
UNRR = BITO 


Sf AAA AA AAAERAAERERERRER ARERR ARE ERE ER AER ERERAEAATRERERAEREE RARE REE ES 


t% IBUS REG 12 


FF AAA A RARER REE RARER EEEEE EERE ERE EREERERREEEAEEEAEA AREER EAR A ES 


Ic = BIT? 
IACT = BIT6 
LULP = BITS 
IRDY = BITS 
OVRR = BIT3 
RAB = BIT2 
EBLK = B1T1 
BCC = BITO 


RING = BIT7 
DTR = BIT6 
RTS = BITS 
HDX = BITS 
MODR = BIT3 
CS = BIT2 
STBY = BIT) 
CARR = BITO 


SF AAAAAAAAAAAAARERRERERAAAEAAEEAEREARAAAEAAAAEARAHEHERAERAR RE KAReKeeeeeRaeeneenenese 


*% IBUS REG 14 


JF AAAAAAAARARAAAEA ARERR AEAERERAARARARREEHERERAREEREREHERERHRH KEKE ReReeeeeeeenaee 


READY = BIT7 
TXEN = BIT6 
DISSI = BITS 
RDAX = BIT4 


~ 
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161 000010 WAX = BIT3 
162 000004 —NAX = BIT2 
163 000002 AX2 = BIT! 
1 000001 Ax1 = BITO 
166 J J AAA AARAAAAARAAAEAARARERAAERAAREEAAAERAARAEEREEEEEEREARAREEEAREAREEEAAEEREREREERE 
167 7* IBUS REG 17 
168 FF RARER AAAAAEAAAAARAERERAARREAAEAAEHAARARRERARERAAEAEREREREHEAERAERARHREREAEEEEED 
16 000200 SIGR = BIT7 
170 000100 $1GQ = BIT6 
171 TXDATA = BITS 
172 OCOR = BITS 
173 000010 ICIR = B1T3 
174 000004 TESTMD. = BIT2 
175 000002 MCLK = BIT) 
i* 000001 DDCMP = BITO 
178 J FERRARA AERA AREEAREEEEEEEREREREREREREREREREREARARREREEREEEAREERAREREREAEEREE ES 
179 :* AXO-15 = USYRT REG 0 (READ ONLY) 
180 SLE AEE REE EERE ERE EERE RERER AREER EREEREEREEE EERE RARE ES 
181 200 RX7 = BIT7 
182 000100 RX6 = BIT6 
183 0 RXx5 = BITS ~ 
184 000020 RX4 = BITS 
185 000010 RX3 = BIT3 “ 
186 RX2 = BIT2 
187 000002 Rx1 = BIT1 
yo 000001 Rx0 = BITO 
190 LL ERA EERE EERE REE EREREEREEREEEREREEEEEEEEEEREEEEEEEREEE REESE 
191 :* AX0-16 = USYRT REG 1 (READ ONLY) 
192 J FEAR AAA EREEEEREEEEEEEEEEREEREEEEEEEEREREEREAEREREPREREER EEE 
193 000200 RERR = BIT7 
194 000100 ASBC2 = BIT6 
195 ASBC1 = BITS 
196 000020 ASBCO = BIT4 
197 000010 ROR = BIT3 
198 000004 RABT = BIT2 
199 000002 REOM = BIT1 
ai 000001 RSOM = BITO 
202 J FREER REE EERE EERE EERE EERE KER REREREEREEER ERE ERE 
203 7* AX1-15 = USYRT REG 2 
204 FF RARER EEE AREER EREREREE EERE EHERE ARERR ERE ES 
205 000200 TX7 = BIT7 
206 000100 TX6 = BIT6 
207 000040 TX5 = 8175 
208 000020 TX4 = BITS 
209 000010 Tx3 = BIT3 
000004 TX2 = BIT2 
000002 TX] = BIT1 
000001 TxO = BITO 


'WEAAAAAAASAALLSZLSZASLAZ£LZASLA BAAS ES ARSS ERR SSE SERRE RRR SRR RR RRR RSE R SRE RR SSR RRR S ER ES 


** AX1=-16 = USYRT REG 3 
000200 TERR = BIT7 


NaMNNMNNoNoNo 
ae td ot od od = 
NO US WN Oo 





~ 


8 
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TXGA = BIT3 
TXAB = BIT2 
TEOM = BITI 
TSOM = BITO 


FRARAARARARAARAAAARARARAARARAARRRERRRRREREERARERAARAAEREAAAREREAAEEAHAREREREREE 


S* AX2=15 = USYRT REG 4 


'MARARARAARRBAARAARARRRARASRARRRRRR RR RR RRRR RRR RRR RRR RR RR RRR RRR RRR RRR RR RRR RRR REARS | 


SN? = BIT? 

SYN6 = = BIT6 

SYNS = =: BITS 

SYNG = = BITS 

SYN3. = BIT3 

SYN2 = BIT2 

SYNT = = BIT1 

SYNO = BITO 

SYNCH = 226 

DFA AEER ARERR ERERAKERRRAEERRAERAERKREERAEEERAEEARA RARER EEERREHERRE REAR 
>* AX2-16 = USYRT REG 5 

CF RAAAAER ARERR AAR REREERRARRRERERERARAEA RARER ERERRRARRRRSERAAEARERERARH EERE 
APA = BIT7 

DDC = BIT6 

STR = BITS 

SEC = BIT4 

IDL = BiT3 

CRCTY2 = BIT2 

CRCTY1 = BITI 

CRCTYO = BITO 


. FARA EAE EERE EEE EERE EERE EAE EERE EEE REA EREREEEEAAEREER EER RE REE 


;* AX3-15 = USYRT REG 6 


SEERA AAERAARREKKEAEERAERAERARAEAERARAEEERERARAERTRAEAERERERREERERAERAEAARAEE AREER ED 


1422 = BIT7 
x¥Z = BIT6 
C32eBCC = BITS 
v35 = BITS 
INTGRL = BIT3 
C32ENB = BIT2 
OP = BIT] 
TEST = BITO 
AX315U = 1422!xXYZ!C32BCC!V35! INTGRL ! OP 


LER RR RRR RARER ARERR RARER REE RE ARERR ERR R EERE E RRR EERE ERR 
3* AX3-16 - USYRT REG 7 


SIERRA AERERERREREEREEEERRR EERE REAR REREAEEEAERRAEAERARAEAERERREREEREP RARER REE 


TXLEN2 = BIT7 
TXLEN] = BIT6 
TXLENO = BITS 
RXLEN2 = BIT2 
RXLENT = BIT] 
RXLENO = BITO 


~~ 
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275 LRRAR RARER EERE ERREEEEREREREREERREREREEEEE EEE RERERER ERE REAR EREERRR ERE RE EEE 
276 7* TX CONTROL BITS DEFINED ON WORD BASIS 
e777 FRR EAE EREREREEEREREE EERE EEE RE RRAE EERE E EERE EERE REE ERET ERR REE 
278 000 TXGOA = BITI1 
279 002000 TXABT = BIT10 
280 001000 TXEOM = BITS 
281 000400 TXSOM = BIT8 
282 
283 
284 
285 
286 
287 SERRA REE REA AR REE ER RR ERERE RR ERERERREEEERER EERE E REE RR Re 

7* RCV CONTROL BITS DEFINED ON WORD BASIS 
289 LRA ARERR REE RE RRR ERE ER ERE ERE EEE REE EERE EERE EERE 

RXOVR = BIT11 
291 002000 RXABT = BIT10 
292 001000 RXEBL = BITS 
293 00 RXBCC = BIT8 
294 
295 
296 
297 
298 REAR RR EERE ERE REE E REE R RE RARAEREREERER EE ARAAEAEEREREEERERREAEREEREEERE REE EE 


;* ADDRESS EQUATES FOR REGISTER STORAGE TABLE (LUREG:) 


FEAR RERERERERAERAEERERAEEAERRREREAAEAERERERAEREEREEEREREREREAE EERE EEERERKEREE EEE 


301 002302 LUR10 = LUREG+0 LINE UNIT IBUS REG 10 

302 2304 LUR11 = LUREG+2 :LINE UNIT IBUS REG 11 

303 306 LUR12 = LUREG+4 LINE UNIT IBUS REG 12 
002310 LUR13 = LUREG+6 :LINE UNIT IBUS REG 13 

305 002312 LUR14 == LUREG+10 LINE UNIT IBUS REG 14 
002314 LUR15 == _LUREG+12 :LINE UNIT IBUS REG 15 

307 002316 LUR16 = LUREG+14 LINE UNIT IBUS REG 16 

308 002320 LUR17_ = LUREG+16 LINE UNIT IBUS REG 17 

309 002322 AX0.15 = LUREG+20 sUSYRT REG 0 

310 002324 0.16 = LUREG+22 ;USYRT REG 1 

311 002326 1.15 = LUREG+24 ;USYRT REG 2 

312 002330 AX1.16 = LUREG+26 ;USYRT REG 3 

313 002332 AX2.15 = LUREG+30 ZSUSYRT REG 4 

314 334 AX2.16 = LUREG+32 sUSYRT REG 5 

315 002336 AX3.15 = LUREG+34 ;USYRT REG 6 

$18 002340 AX3.16 = LUREG+36 ;USYRT REG 7 

318 

319 

320 

321 

$56 100000 CHPCHK = BIT15 

324 100009 BCCCHK = BIT15 

325 100000 CRCCHK = BIT15 

326 

327 

328 

329 

330 

331 PERERA AAA AAA EREERERAERAAAERAAERARARAARRERERARARRRRERREE EERE ReReReneese 









CZDMRB M8203 STATIC DIAG #1 
GLOBAL EQUATES SECT 


ION 


;* MICROINSTRUCTION DEFINITIONS 


{Ree RRERRRERRERRRERERRER EERE RREERER RRR ERE EERE E REE RR ERROR RHEE EERE RRR EER eREE 


MV IOX 
MVIXO 
MV I XOX 


021000 
121000 


Cc 
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:MOVE IBUS TO OBUS* 
:MOVE IBUS* TO OBUS 
sMOVE IBUS* TO OBUS* 


;kenee ae FLAG DEFINITIONS ***** 


RRDYTO 
WRDYTO 


BIT) 








002302 


OWDWNAWEWWN —OOODNAUEWN 


PRU US Sawa wruwnvuo 
8 
Nm 
Ww 
yw 
&* 


57 002454 


CZDMRB M8203 STATIC DIAG #1 
GLOBAL DATA SECTION 


160172 
160174 


E 5 
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-SBTTL GLOBAL DATA SECTION 


STE tee bata tetinn Caen ee a 
:/ THE Se in oe tests CONTAINS DATA THAT ARE USED 


i/ IN MORE TEST 
SSASITTIITATTIAITATTA STATA ATED TTT IATA TTT ESTATES TATA 


SLA ARERR AERA RARER EERREERREEREEEREERRERAAEERERARAEEAERAAERERERERERRERERER EH 


* STORAGE FOR DEVICE REGISTERS 


MOE AAAARARAARAALALASAASALARARARESARR SALAS AS ASAE ARR ARERR RSE RAR RRR RRR RRR REA SE SS 


LUREG: .BLKW 16. 


MARAAARAAASAASAASAALARSALALERAAARARASSR ESS SAS ESAS ERASER RRR SESE SRR RRR ASRS ES SS | 


t* MISCELLANEOUS STORAGE 


a 


SCRACH: .WORD 0) ;GEN*L PURPOSE SCRATCH WORD 
LOGDEV: .WORD 0 LOGICAL DEVICE NUMBER 
PSTACK: .WORD 0 :CONTAINS BASE LEVEL PROGRAM STACK POINTER 
PRIOR: .WORD 0 CPU PRIORITY FOR PRINTOUT 
SUBRPC: .WORD 0 :PC_OF SUBR CALL FOR ERROR REPORTS 
INTFLG: .WORD 0 : INTERRUPT RECEIVED FLAGS 
:_ BIT 0 FOR TX, BIT 1 FOR RCV 

ERRFLG: .WORD 0 ; SUBROUT INE ERROR FLAG 
TIMFLG: .WORD 0 ;EVENT TIMEOUT F “9 
RETADR: .WORD 0 ; SUBR ERROR RETURN AD DRESS 
REDBYT: .WORD 0 :LO BYTE CONTAINS BYTE READ FROM LU REG 
WRIBYT: .WORD 0 :LO BYTE CONTAINS BYTE TO LOAD INTO LU REG 
RAX15: .WORD QO :LO BYTE CONTAINS BYTE READ FROM REG 15 
RAX16: .WORD 0 :LO BYTE CONTAINS BYTE READ FROM REG 16 
WAX15: .WORD 0 ;LO BYTE CONTAINS BYTE TO LOAD INTO REG 15 
WAX16: .WORD 0 :LO BYTE CONTAINS BYTE TO LOAD INTO REG 16 
REGNUM: .WORD 0 ;NUMBER (10-17) OF LINE UNIT REG BEING TESTED 
AXNUM: .WORD 0 sNUMBER (0-7) OF Fae akta REG BYTE BEING TESTED 
GOODAT: .WORD 0 STORAGE FOR EXPECTED 7 
BADDAT: .WORD 0 :STORAGE FOR ACTUAL DATA 
LOADAT: .WORD 0 CONTAINS TEST DATA LOADED INTO REG 
FRSTIM: .WORD QO :FLAG=0 IF PROGRAM JUST LOADED 
SAVES: .WORD 0 :SAVE LOC 4 HERE (ERROR TRAP VECTOR) 
SAVE6: .WORD 0 :SAVE LOC 6 HERE (ERROR TRAP VECTOR) 
ERROR1: .WORD 0 ;SUBR ERROR BIT FLAGS (DEF*D IN GLOBAL EQUATES) 
TXWORD: .WORD 0 :BITS 0-11 CONTAIN DATA TO .o INTO TX SILO 
RXWORD: .WORD 0 BITS 0-11 CONTAIN DATA READ FROM RCV SILO 
DISILO: .WORD Q ; CONTAINS CURRENT ale OF DISSI IN BIT 5 
CHPTYP: .WORD 0 [USYRT CHIP TYPE, FOR SIG, ELSE =1 
SAVLEN: .WORD 0 SAVED TX AND RCV CHAR LENGTHS 

: .WORD 0 ;BIT MAP OF ACTIVE DEVICES 
DEVPTR: .WORD 0 DEVICE MAP BIT POINTER 
UNIT: .WORD 0 : CONTAINS UNIT NO. (1 TON) 
TSTNUM: .WORD 0 [CONTAINS TEST NUMBER FOR SOME TESTS 
STARES: .WORD 0 sFLAG=0 IF FIRST PASS AFTER STA OR RES 
pp eterenaee CURRENT DEVICE PARAME TERS REKKRREEKEREE 
MPCSR: .WORD 169170 POINTER TO MICROPROCESSOR CSR'S 
BSEL1: .WORD 160171 :POINTER TO BSEL1 
BSEL2: .WORD 160172 :POINTER TO BSEL2 


SEL4: WORD 160174 :POINTER TO SEL4 


—_ 


ol 
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GLOBAL DATA SECTION 


58 002456 160176 SEL6: .WORD 160176 sPOINTER TO SEL6 

59 002460 000300 MPIVEC: .WORD 300 MICROPROCESSOR INPUT INTERRUPT VECTOR 

60 002462 000304 MPOVEC: .WORD 304 MICROPROCESSOR OUTPUT INTERRUPT VECTOR 

61 002464 000240 MPRIOR: .WORD 240 ay ee er DEVICE PRIORIT 

62 002466 000000 LUSWI1: .WORD 0 LINE UNIT SWITCH PACK #1 

63 002470 000000 LUSWI2: .WORD 0 LINE UNIT SWITCH PACK #2 

64 002472 000000 LUSWI3: .WORD 0 TINE UNIT SWITCH PACK #3 

65 002474 000000 TSTCON: .WORD 0 :TEST CONNECTOR INDICATOR 

66 002476 000000 RUNINH: .WORD 0 RUN SWITCH INDICATOR 
y#eeee STORAGE FOR DATA READ IN ADDRESS TESTS #eeee 

69 002500 000 REDDAT: .BYTE 0 

70 002501 000 “BYTE 9 

71 002502 000 BYTE O 

72 002503 000 BYTE O 

73 0025 000 BYTE 0 

74 002505 000 .BYTE O 

75 002506 000 BYTE 0O 

76 002507 000 BYTE O 

78 yp**es GEN'L PURPOSE SCRATCH STORAGE ***«« 

79 002510 900000 REGO: .WORD 0 

80 002512 000000 REG] -WORD 0 

81 002514 000000 REG2 «WORD 0 

82 002516 000000 REG3 WORD 0 

83 002520 000000 REGS -.WORD 0 

84 002522 000000 REGS .WORD 0 

85 002524 000000 REG6 WORD 0 

86 002526 000000 REG7 .WORD 0 

88 zo**** SCRATCH STORAGE FOR MESSAGE REPORTING ***** 

89 002530 000000 TMPO: .WORD 0 

90 002532 000000 TMP1 .WORD 0 

91 0025 000000 TMP2 WORD 0 

92 002536 000000 TMP3 WORD 0 

93 002540 000000 TMP4 WORD 0 

94 002542 000000 TMPS -WORD 0 

95 002544 000000 TMP6 WORD 0 

% 002546 000000 TMP7 -WORD 0 

98 yeeeee INBUS LU REG BIT MASKS FOR UNPREDICTABLE BITS ***«« 

99 002550 UPBITS: 

100 002550 000 .BYTE 000 sMASK FOR REG 10 

101 002551 056 .BYTE 056 sMASK FOR REG 11 

102 002552 000 -BYTE 000 sMASK FOR REG 12 

103 002553 257 BYTE 257 MASK FOR REG 13 

104 002554 100 .BYTE 100 sMASK FOR REG 14 

105 002555 377 .BYTE 377 :MASK FOR REG 15 

106 002556 377 -BSYTE 377 :MASK FOR REG 16 

107 002557 306 .BYTE 306 :MASK FOR REG 17 

4 44 002560 200 RIGNRW: .BYTE 200 REG 14 NON-R/wW BITS 

111 peeeee MASKS FOR EXTENDED REGISTER NON-READ/WRITE BITS ****+ 

112 002561 ANBITS: 

113 002561 377 BYTE 377 :MASK FOR AXQ=-15 

114 002562 377 BYTE 377 :MASK FOR AX0-16 









G $5 
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peeee* DATA PATTERN E e828 


gs 
oe 
¥ 
38 


115 002563 BYTE 000 ;MASK FOR AX1-15 
116 0025 360 BYTE 360 sMASK FOR AX1=-16 
117 002565 BYTE 000 MASK FOR AX2=-15 
118 002566 000 BYTE 000 ;MASK FOR AX2=-16 
119 002567 004 BYTE 004 ;MASK FOR AX3=-15 
i’ 002570 030 BYTE 030 7MASK FOR 4X3-16 
122 peteee DATA PATTERN A *eee8 
123 002571 PATA: 
124 002571 125 BYTE 125 
125 002572 252 -BYTE 252 
126 002573 000 -BYTE 000 
127 002574 377 -BYTE 377 
128 002575 001 -BYTE 001 
129 002576 002 -BYTE 002 
130 002577 004 -BYTE 4 
131 002600 010 -BYTE 010 
132 002601 020 -BYTE 020 
133 002602 040 -BYTE 040 
134 002603 100 -BYTE 100 
135 002 200 -BYTE 200 
136 002605 376 -BYTE 376 
137 002 375 -BYTE 375 
138 002607 373 -BYTE 373 
139 002610 367 -BYTE 367 
140 002611 357 BYTE 357 
141 002612 337 BYTE 337 
142 002613 277 BYTE 277 
coz 002614 177 BYTE ie 
4 
145 p*see DATA PATTERN B tee 
146 002615 PaTR: 
147 002615 000 -BYTE 000 
148 002616 000 -BYTE 000 
149 002617 060 -BYTE 040 
150 002620 100 -BYTE 100 
151 002621 220 BYTE 220 
152 002622 000 BYTE 000 
153 002623 000 -BYTE 000 
+4 002624 051 -BYTE 051 
156 peste DATA PATTERN ( tee 
157 002625 PATC: 
158 002625 020 -BYTE 020 
159 002626 020 -BYTE 020 
oF 002627 020 -BYTE 020 
162 peeeee DATA PATTERN D «e208 
002630 PATD: 
002630 000 -BYTE 000 
002631 040 "BYTE 040 
$ 002632 000 -BYTE 000 
68 
PATE 
BYTE Yoo 
BYTE 120 
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GLOBAL DATA SECTION 


ee eee 
SSSVRALAVALS ISVS ARAW 
8 
N 
g 
Ww 


191 002652 


Sis 


— oat ss SY) Yt 


NOMGMNMMNNNN NN 
Soe NOW EWM O 


$s! 002677 


7 
228 002704 


020 
100 
120 
000 


88 


WIWWWWNWOW. 


NNNN-N 
NYUINNN™N 


Sssrkcss 


8 
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*eeeee 


PATF: 


*eeaeee 
° 


PATG: 


-eaekee 
. 


PATH: 


seekee 


PATI: 


"eae ene 
. 


PATJ: 


-akene 
e 


PATK: 


-BYTE 020 
BYTE 100 
BYTE 120 
-BYTE 000 
DATA PATTERN 
BYTE 050 
-BYTE 051 
-BYTE 050 
DATA PATTERN 
-BYTE 000 
-BYTE 000 
BYTE 240 
BYTE 120 
BYTE 177 
BYTE 000 
BYTE 000 
BYTE 001 
DATA PATTERN 
BYTE 000 
BYTE 000 
BYTE 377 
BYTE 017 
BYTE 377 
BYTE 377 
BYTE 375 
BYTE 377 
DATA PATTERN 
BYTE 000 
BYTE 000 
BYTE 000 
BYTE 000 
BYTE 000 
BYTE 103 
BYTE 000 
BYTE 000 
DATA PATTERN 
BYTE 000 
BYTE 000 
BYTE 010 
BYTE 002 
BYTE 004 
BYTE 103 
BYTE 001 
BYTE 100 


DATA PATTERN 
-BYTE 000 


G 


H 


-_ 


J 


aeene 


ageene 


rreae 


xrawee 


aeaeee 


aaaee 


SEQ 


59 


Soe 
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229 002705 —- 000 BYTE 000 
230 002706 = 377 “BYTE 377 
231 002707 ~—s_«-377 “BYTE 377 
232 002710 = 125 “BYTE 125 
233 002711 125 "BYTE 125 
34 002712 «= 252 "BYTE 252 
235 002713 =. 252 "BYTE 28 
002714  —-001 “BYTE 001 
237 002715 —«-000 "BYTE 0 
38 002716 ~=—-002 “BYTE 002 
239 002717 —-000 “BYTE 000 
240 002720 004 “BYTE 
241 002721 000 “BYTE 000 
242 002722 = 010 “BYTE 010 
243 002723 —s-:000 “BYTE 000 
244 002724 020 “BYTE 020 
245 002725 000 “BYTE 000 
246 002726 = 040 “BYTE 040 
247 002727 ~—s-:000 “BYTE 000 
248 002730  —«- 100 “BYTE 100 
249 002731 000 “BYTE 000 
250 002732 200 “BYTE 200 
251 002733 —-000 “BYTE 000 
252 0027 000 “BYTE 000 
253 002735 —s- 001 "BYTE 001 
254 0027 000 “BYTE 000 
255 002737 «002 “BYTE 002 
56 002740 000 “BYTE 000 
257 002741 004 "BYTE 004 
258 002742 «000 “BYTE 000 
259 002743 ~—s-:010 “BYTE 010 
260 002744 0 “BYTE 000 
261 002745 020 “BYTE 020 
002746 000 “BYTE 000 
263 002747 040 “BYTE 040 
264 002750 000 “BYTE 000 
265 002751 100 “BYTE 100 
002752 ‘BYTE 000 
267 002753 “BYTE 200 
268 002754 376 "BYTE 376 
269 002755 «377 "BYTE 377 
70 002756 = 375 “BYTE 375 
271 002757377 "BYTE 377 
272 002760 = 373 "BYTE 373 
273 002761 377 “BYTE 377 
274 002762 s-367 "BYTE 367 
275 002763 = 377 "BYTE 377 
276 002764 357 “BYTE 357 
277 002765 377 "BYTE 377 
278 002766 = 337 "BYTE 337 
279 002767 377 ‘BYTE 377 
80 002770 =. 277 “BYTE 277 
281 71 377 "BYTE 377 
282 002772. ~—s177 "BYTE 177 
283 002773 = 377 BYTE 377 
84 002774 377 BYTE 377 


ne 


CZDMRB M8203 STATIC DIAG #7 


GLOBAL DATA SECTION 


286 002776 
287 002777 
2 3000 


288 00 

289 003001 
3002 

291 003003 
3004 

293 003005 
3006 


3 
333888 
a 


S sass 
Wh 


S83 
ans 


BSSSSRSSssssssessssy 
ae 


3022 


WWAWAIAIAWWAAAAG 
ew tat et at Se 
WWNAWVEWR-O 


8 
S 888888388 pamemae 888s 


RRS 


335 003046 
304 


neo vereusss 


a 
_ 
N 


Pa. 8 


BYTE 377 
BYTE 375 
BYTE 377 
BYTE 373 
BYTE 377 
BYTE 367 
BYTE 377 
BYTE 357 
BYTE 377 
BYTE 337 
BYTE 377 
BYTE 277 
BYTE 377 
BYTE 177 
yeeeee DATA PATTERN 
PATL: 
.BYT 000 
-BYTE 000 
.BYTE 377 
-BYTE 377 
BYTE 000 
BYTE 000 
;aeeee DATA PATTERN 
PATM: 
BYTE 0Q20 
-BYTE 
-BYTE 000 
-BYTE 200 
-<BYTE 000 
-BYTE 000 
BYTE 051 
peeeee DATA PATTERN 
PATN: 
-BYTE 000 
-BYTE 000 
-BYTE 000 
BYTE 125 
-BYTE 000 
a 252 
Y 
BYTE 005 
BYTE 000 
BYTE Qie 
BYTE 000 
BYTE 017 
BYTE 000 
;eeeee DATA PATTERN 
PATO: 
BYTE 000 
BYTE 041 


i 
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L s*ete 


M enxeee 


N eeee8 


QO s*ee8 


SEQ 


61 


oY 


343 003053 


370 003103 
371 
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GLOBAL DATA SECTION 


S8és 


SSSSsES SSS 


, Kk 5 
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-8YTE 010 
-BYTE 020 
-BYTE 060 
BYTE 100 
-BYTE 101 
-BYTE 200 
.BYTE 201 
-BYTE 300 
.BYTE 111 
-BYTE 301 
-BYTE 375 
p*eene DATA PATTERN 
PATP: 
-BYTE 000 
-BYTE 113 
-BYTE 200 
-BYTE 040 
-BYTE 020 
-BYTE 010 
-BYTE 001 
-BYTe 104 
-BYTE 007 
-BYTE 105 
-BYTE 007 
-BYTE 144 
.BYTE 107 
BYTE 157 
y**e** DATA PATTERN 
PATU: -BYTE 000 
-BYTE 000 
-BYTE 001 
-BYTE 000 
-BYTE 013 
-BYTE 000 
.BYTE 011 
-BYTE 000 
-BYTE 021 
-BYTE 000 
-BYTE 101 
-BYTE 000 
-BYTE 301 
-BYTE 000 
-BYTE 000 
-BYTE 001 
-BYTE 002 
-BYTE 000 
-BYTE 004 
.BYTE 000 
-BYTE 040 
-BYTE 000 
-BYTE 100 
-BYTE 000 
-BYTE 200 
-BYTE 000 


P eeeee 


U xtene 


SEQ 


62 


Onn 
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GLOBAL DATA SECTION 


400 003137 


215 
449 003216 
450 003217 


452 003220 





L 5 
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BYTE 


CZDMRB M8203 STATIC DIAG #1 
GLOBAL DATA SECTION 


M 
MACRO V03.01 17-OCT-79 08:49:54 PAGE 15-8 


TEST MESSAGES TO BE TRANSMITTED *#* 


p*** RECEIVED DATA BUFFER (64. WORDS) *#« 
RCVBUF: .BLKW 64. 





N 5 
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GLOBAL TEXT SECTION 


-SBTTL GLOBAL TEXT SECTION 

999 999999 9999999995999999995999999999999999999999999999 995078 t ett TTT 88! 
3 THE GLOBAL TEXT SECTION CONTAINS FORMAT STATEMENTS, 

:% MESSAGES, AND ASCII INFORMATION THAT ARE USED IN 

3% MORE THAN ONE TEST. 

Be 999 9999999999959 9999999999999999999959999599999599999959999999999999999595 550) 


J FEAR AAA AA AAAEARERRAREREREEERARERRERERERERERREREEREREERERERERREAERAREREREE 


;* NAMES OF DEVICES SUPPORTED BY PROGRAM 


FF AAA AA AAAAA AA ARAARARAREERAERERARRARAERRRAERARAEARRARRAERARAARRERERAEAEEAREREEEE 


DEVTYP <M8203> 


MO VODNAWSWN— 


— + 2 


LSDVTYP:: 
-ASCIZ /M8203/ 


-EVEN 


RRA EERE REE EERE EERE AERA TEETER ERA R ARERR ARR eA ATE eee 
;* TITLE OF PROGRAM 
* 


MARA a ha AARAAAAAAARALASZAAAAASRARRRARSSRSEREESRR RRR ARERR A SERRE RES ESE RRR ER RRR SS 


DESCRIPT <M8203 STATIC LOGIC TESTS - PART 1 OF 2> 
“" ASCIZ /M8203 STATIC LOGIC 


28 


RZZe 

~S 
WO 

=—NOWVUIWNW © 


Weeks otaeeeks 
Ovum = 
SENEVSS=SS 


4 
1 
4 
1 
4 
4 
5 
1 
0 
7 
2 


g= 
s 


+ FORMAT STATEMENTS USED IN PRINT CALLS 


7a Le tama? tile ae niet oa ae 
: ge THE —. a USED IN THE VARIOUS PRINT CAL 


USE THE .ASCiZ STA 
RTT TSTTTTT TTT TT TTT TTT ETRE EERE Eee 





ee 


CZDMRB M8203 STATIC DIAG #1 
GLOBAL SUBROUTINES 


— ae oe es ws 
OWWNAUES WR HO O@ONOAUSWh— 


Noe 
gg 
WG 
wv 
xg 


2 
23 


57 003656 


152777 


010146 


0146 
013701 002400 
301 


8 
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176702 


176642 
176634 


176614 


-SBTTL GLOBAL SUBROUTINES 
BU 
37 THE GLOBAL SUBROUTINES ARE CALLED BY MORE THAN ONE TEST 

SIIIIITITITIT TTT I TT TA AAT ATTA AAA ATA AAAI 


FERRARA REREREEREAAEEEERERREAREAREREREEAERARERAERERERREREREARRREREREEHEEEREE ES 


* STPCLK = THIS SUBROUTINE FORCES THE DMC11 OR KMC11 MICROPROCESSOR TO 

: EXECUTE AN INSTRUCTION WHICH IS PASSED IN THE WORD FOLLOWING THE CALL. 
'MARAARARAAARAASAALALELLSLALALARARRELEL ESAS EERE REAR AREER RRR RRR RRR ER ESE RRR RRR EERE ES | 
STPCLK: 

BISB § #ROMO!ROMI,@BSEL1 {SET ROMO, ROMI BITS IN BSEL1 


MOV 

BISB #ROMO!ROMI ' STEPMP, @BSEL1 ;SET ROMO, ROMI, STEPMP IN BSEL1 
BICB #ROMO!ROMI'STEPMP,@BSEL1 :CLEAR ROMO, ROMI, STEPMP IN BSEL1 
ADD #2, (SP) :FIX UP RETURN PC 

RTS PC RETURN 


RARER EERE ERR RARER EERE REAR ERRR EERE RRR EERE ERE RTE R EERE 
3* MSTCLR = THIS SUBROUTINE ISSUES A MASTER CLEAR AND SETS LULOOP 
Petite iti iti titi iiiict iii iit iit iati iii iii itt iti tiiei iii riti iii ii iy) 
MSTCLR: 

MOV R1,-(SP) SAVE R1 

MOVB AMCLR,@BSEL1 ;SET MASTER CLEAR BIT 

BICB MRUN'!MCLR,@BSEL1 ;CLEAR RUN AND MCLR BITS 


MOV #20.,R1 INITIALIZE STALL COUNTER 
2s: ae - :STALL IN LOOP FOR SEVERAL MICRO=SEC 
BNE 2$ 
BISB MLULOOP,@BSEL1 ;SET LU LOOP 
MOV (SP)+,R1 RESTORE R1 
CLR SAVLEN ;CLEAR CHAR LENGTH FROM SETUP 
RTS PC RETURN 


RARER ERAREAAEAREAERAAAEAEARAERAAARAEERARARARAAAEERAEERAARAEREEREREEAEAEREREHERE REE 


; * READLY ~- THIS SUBROUTINE FORCES THE DMC11 OR KMC11 MICROPROCESSOR 
TO EXECUTE AN INSTRUCTION WHICH et Ry THE LINE UNIT REG WHOSE 


saan a 


* NUMBER IS PASSED IN REGNUM, INTO R 
ee RRERREREREREREREREARRRRERR RR RERERERERR ERR RRR RR ER EERE RRR R RRR E RENEE EERE REE 
READLU: 
MOV —_ R1,=( SP) SAVE RI 
MOV —REGNUM,R1 /GET LINE UNIT REG NUMBER 
ASL R1 SHIFT INTO SOURCE BITS 4-7 
ASL R} 
ASL RI 


an 


CZDMRB M8203 STATIC DIAG #1 
GLOBAL SUBROUTINES 


105 
106 


~~ e et et o o o 
— Se Lo] 
RAN=OSRN 


003770 
72 


010146 


176544 
002365 


C 
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002364 


176476 


002400 


000020 


23: 


R1 
#4 ,R1 
eo 


R1,2 
PC,STPCLK 
@BSEL4 ,REDBYT 
REDBYT+1 


(SP)+,R1 
PC 


SET DESTINATION = BSEL4 


RU 
ON AS SUBROUTINE ARGUMENT 
SEXECUTE MOVE INSTRUCTION 
; INSTRUCTION GOES HERE 
:GET LU REG wig lt INTO REDBYT 
:CLR_HI BYTE OF STORAGE 
RESTORE R1 


etree titi i iii t iii ititiitiiiiiiilitiititiiiiiiitiiiiti iii iii iit. 
;* WRITLU - THIS SUBROUTINE FORCES THE DMC11 OR KMC11 MICROPROCESSOR TO 

EXECUTE AN INSTRUCTION WHICH LOADS THE BYTE CONTAINED IN WRIBYT 

INTO THE LU REG WHOSE NUMBER IS PASSED IN REGNUM, 


FARRER ARERR EREERERARRRAEAEEREEEREREERERAEAREAEERAEERERARKRER ER EH 


-* 
. 
*@ 


WRITLU: 


2s: 


R1,-(SP) 


R 

WRIBYT+1 
WRIBYT ,@BSEL4 
PC,STPCLK 


0 
(SP)+,R1 
PC 


:SAVE R1 

GET LINE UNIT REG NUMBER 

:SET SOURCE = BSEL4 

SET REST OF MOVE INSTRUCTION 

7S ON AS SUBROUTINE ARGUMENT 
:CLR HI BYTE OF STORAGE 

;LOAD BYTE INTO BSEL4 

SEXECUTE MOVE INSTRUCTION 


;RESTORE R1 
SRETURN 


—‘mAAAAASEAEESAARESLAZAAASARASASASEAL REAR ASA SALA RRR RRR RR RRR SERRE RRS SERRA SESE REE SSE ED 


* 


GETREG: 


3$: 


;* GETREG - THIS SUBROUTINE READS THE = UNIT REGISTERS 10-17 INTO THE 


REGISTER STORAGE TABLE (LUREG:) 


MOV 


READLU 
REbAYT. (R1)+ 
(R1) 

REGNUM 
epeteatinia 
(SP) + ,REGNUM 


(SP)+,R1 
PC 


- keRRERRRRRRRRERRERRRRRERRE RR ERRR EERE RRR E RRR E RRR E RRR RRR REE 


sSAVE R1 
SAVE CURRENT REG NO 
:INIT POINTER TO REG STORAGE TABLE 


: A_LINE R 

PUT BYTE “9 5 INTO TABLE 

;CLEAR UPPER BYTE OF TABLE ENTRY 
See IF AL REG NO. 

EE Nd at REGS READ YET 
RESTORE CURRENT REG NO. 
RESTORE R1 
RETURN 


an 


D 6 
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GLOBAL SUBROUTINES 


115 
11 

119 Se LOOPIN = THIS SUBROUTINE PLACES THE MICROPROCESSOR INA LOOP ON AN 
118 >* LOOPIN = THIS SUBROUTINE PLACES THE MICROPROCESSOR IN A LOOP ON AN 

119 :* INSTRUCTION, BY MOVING THE INSTRUCTION FROM THE WORD FOLLOWING THE CALL 
120 :* INTO SEL6, AND SETTING RUN AND ROMI IN BSEL1. THE SUBROUTINE RETURNS 
121 :* WITH THE MICROPROCESSOR STUCK IN THE LOOP, AND IF IT IS DESIRED TO 

102 ie TERMINATE THE LOOP, THE PDP=11 PROGRAM MUST CLEAR THE RUN BIT IN 

123 :* BSEL1, OR CALL SUBROUTINE MSTCLR TO DO THIS. 

124 TERRA AA RARER AAEAEAAERREEARAEEREERERRAEREEERRERAAREERRERAERERREREREERRERREREERERERE REE 
125 004046 LOOPIN: 

126 004046 152777 000006 176374 BISB § #ROMO!ROMI,@BSEL1 ROMO, ROMI BITS IN BSEL1 

127 004054 017677 000000 176374 MOV a(SP) .aSELé :PUT michoinSthor lon INTO SEL6 

128 004062 152777 000206 176360 BISB  #RUN'ROMO'ROMI,@BSEL1 ;SET RUN, ROMO, ROMI IN BSEL1 

129 004070 062716 000002 ADD #2, (SP) ;F1X UP RETURN PC 

130 004074 000207 RTS PC [RETURN WITH MICROPROCESSOR STUCK IN SINGLE 

131 : INSTRUCTION LOOP 

132 

133 

134 

FF 

137 PAAR AEE RARER ORE ERREERAEREERAREREREREREEREREERERAERERAEREEREEREERRIEAEREHEREEE 
138 7* READAX = THIS sie READS THE USYRT REG PAIR WHOSE NUMBER (0-3) 

139 te IS PASSED IN BITS 1,2 OF AXNUM ON ENTRY, AND RETURNS THE BYTES READ IN 
140 3* RAX75 AND RAX16. IF THE LINE UNIT DOES NOT RESPOND WITH READY IN REG 14, 
141 te RRDYTO BIT IS SET IN ERROR1 ON RETURN, 

142 FERRARA AEEEEEREREREERERAEERARERAERRARRERRAEEREEERAEREAROREERERRERER EERE 
143 004076 010146 READAX: MOV R1,-(SP) 7SAVE R1 

144 004100 013746 002400 MOV REGNUM,-(SP) STORE CURRENT REG NO. 

145 004104 042737 000001 002420 BIC ARRDYTO,ERROR1 :CLEAR ERROR BIT 

146 004112 012737 000014 002400 MOV #14 ,REGNUM SSET LU REG NO. = 14 

147 004120 113737 002402 002366 MOVB AXNUM,WRIBYT | :SET UP AX REG NO. BITS 

148 004126 006237 002366 ASR WRIBYT 

149 004132 152737 000024 002366 BISB #RDAX'ENAX,WRIBYT ;SET UP BITS TO LOAD INTO REG 14 

150 004140 053737 002426 002366 BIS DISILO,WRIBYT | ;:SET PROPER STATE OF DISSI BIT 

151 004146 004737 003722 JSR PC,WRITLU ZSET RDAX AND ENAX IN REG 14 

152 004152 005001 CLR R1 ‘INIT TIMER 

153 004154 004737 003644 63: JSR PC ,READLU TREAD REG 14 

154 004160 132737 000200 002364 BITB #READY,REDBYT :SEE IF READY BIT SET IN REG 14 YET 

155 004166 001006 BNE 9$ ‘BR IF READY SET 

156 004170 005201 INC R1 TINCR TI 

157 004172 001370 BNE 6$ “BR IF TIMER DIDN'T TIME OUT YET 

158 004174 052737 000001 002420 BIS #RRDYTO,ERROR1 ;SET ERROR FLAG FOR TIME our ON READ RDY 

159 004202 000424 BR 12$ 7BR TO RETURN 

160 004204 012737 000015 002400 98: MOV #15 ,REGNUM SSET REG NO. = 15 

161 004212 004737 003644 JSR PC ,READLU TREAD REG 15 

162 004216 113737 002364 002370 MOVB  REDBYT,RAX15 = :STORE REG AX-15 

163 004224 105037 002371 CLRB  —-RAX15+4 :CLR HI BYTE OF STORAGE 

164 004230 012737 000016 002400 MOV Me. REGNUM [SET REG NO. = 16 

165 004236 004737 003644 JSR PC ,READLU TREAD REG 16 

166 004242 113737 002364 002372 MOVB REDBYT RAX16 =: STORE REG AX-16 

167 004250 105037 002373 CLRB 6+) :CLR HI BYTE OF STORAGE 

168 004254 012637 002400 12$: MOV topys REGNUM §:RESTORE CURRENT REG NO. 

169 004260 012601 MOV (SP)+°R1 SRESTORE R1 

170 004262 000207 RTS PC ‘RETURN 





an 
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172 
iH 
175 RRR AERA REAR ERERE ERE EER EERAREARERERRERERERREEEREEREERERE EER RTE 
176 3* WRITAX = THIS SUBROUTINE WRITES THE USYRT REG PAIR WHOSE NUMBER (0-3) IS 
177 * PASSED IN BITS 1,2 OF AXNUM ON ENTRY, WITH THE DATA FROM WAX15 AND 
178 3* WAX16. IF LINE UNIT DOES NOT RESPOND WITH READY IN REG 14, WRDYTO BIT 
179 ;* IS SET IN ERROR] ON RETURN. 
180 Sade adesbndeshadeatedadede taledytndedeadecbadadatededadednddebuindel-inttaieaiaiaininiaininnieininininiininininninininininiaiainieiaiaiaieiaiade 
181 004264 010146 WRITAX: MOV R1,-(SP) ;SAVE R1 
182 004266 013746 002400 MOV REGNUM, -(SP) + SAVE CURRENT REG NO. 
183 004272 042737 000002 002420 BIC MWROYTO,ERROR1 CLEAR ERROR BIT 
184 012737 000014 002400 MOV #14 ,REGNUM SET a4 REG NO. 14 
185 113737 002402 002366 MOVB AXNUM ,WRIBYT ;SET AX REG NO. BITS 
186 004314 002366 ASR WRIBYT 
187 004320 053737 002426 002366 BIS DISILO,WRIBYT ;SET PROPER STATE OF DISSI BIT 
188 004326 004737 003722 JSR PC ,WRITLU ;SET AX NO. BITS IN REG 14 
189 004332 012737 000015 002400 MOV #15 ,REGNUM :SET REG NO. 3 
190 004340 105037 002375 CLRB WAX15+1 2sh8 HI BYTE OF § TORAGE 
191 0046344 113737 002374 002366 MOVB WAX15 ,WRIBYT 7SET UP BYTE TO WRITE INTO REG 15 
192 004352 004737 003722 JSR PC ,WRITLU WRITE BYTE INTO REG 15 
193 004356 005237 002400 INC REGNUM ;SET REG NO. 16 
194 004362 105037 002377 CLRB WAX 1641 :CLR HI BYTE OF STORAGE 
195 004 113737 002376 002366 MOVB WAX16,WRIBYT SET UP BYTE TO WRITE INTO REG 16 
196 004374 737 003722 JSR PC ,WRITLU ;WRITE BYTE INTO REG 16 
197 004400 012737 000014 002400 MOV #14 ,REGNUM SET REG NO. = 14 
198 004406 113737 002402 002366 MOVB AXNUM ,WRIBYT SET AX REG NO. BITS 
199 004414 006237 002366 ASR WRIBYT 
200 004420 152737 000014 002366 BISB HENAX!WAX ,WRIBYT ;SET UP BITS TO LOAD INTO REG 14 
201 004426 053737 002426 002366 BiS DISILO,WRIBYT ;SET PROPER STATE OF DISSI BIT 
202 004434 004737 003722 JSR PC,WRITLU sSET ENAX AND WAX IN REG 14 
203 004440 005001 CLR R1 ; INIT PROGRAM TIMER 
204 004442 004737 003644 6$: JSR PC ,READLU ZREAD REG 14 
205 004446 132737 000200 002364 BITB #READY ,REDBYT ;SEE IF READY BIT SET IN REG 14 YET 
206 004454 001005 BNE 9$ ‘BR IF READY SET 
207 004456 005201 INC R1 ; INCR TIMER 
208 004460 001370 BNE 6$ [BR IF TIMER DIDN'T TIME OUT YET 
209 004462 052737 000002 002420 BIS MWRDYTO,ERROR1 ;SET ERROR FLAG BIT FOR TIME OUT ON WRITE RDY 
210 004470 012637 002400 9$: MOV (SP) +,REGNUM [RESTORE CURRENT REG NO. 
211 004474 012601 MOV (SP)+,R1 RESTORE R1 
51g 004476 000207 RTS PC 
214 
215 
216 
217 
218 PRR RRR EERE ER ERE EERE RARER EAR RARER EEE RRR ERE Ee 
219 3* GETALL - THIS SUBROUTINE READS THE LINE UNIT REGS 10-17 AND THE EXTENDED 
220 7* REGISTERS AXO-AX3 INTO REGISTER STORAGE TABLE (LUREG:). 
221 LERAAAA ERE REAR E RE EREER EEE E RR EREREEERAAARERAERERAAE ARERR ERE EERE Ree 
222 0045 010146 GETALL: MOV R1,-(SP) SAVE R1 
223 004502 013746 002402 MOV AXNUM , - (SP) ;SAVE CURRENT AX REG BYTE NO. 
0045 012737 014411 002530 MOV A#DHS, TMPO ;SET AX LO BYTE NO. 
225 004514 032737 000001 002402 BIT #8170, AXNUM ;SEE IF LO OR HI BYTE 
226 004522 001403 BEQ 1$ :BR IF LO aA 
227 004524 012737 014414 002530 MOV #DH6, TMPO ;SET AX HI BY 


TE NO. 
228 004532 004737 003770 1$: JSR PC,GETREG ;READ AND STORE REGS 10-17 


On 








GLOBAL 


229 0045 142777 
230 004544 012701 
231 004550 005037 
232 004554 004737 
233 004560 113721 
234 004564 105021 
235 006566 113721 
236 004572 105021 
237 004574 73 

238 004602 023727 
239 00461 














258 904634 013746 








CZDMRB M8203 STATIC DIAG #1 
SUBROUTINES 


000020 
004500 


175704 


002402 
000010 


002532 


002364 


3$: JSR 


#LULOOP, + 
a 15,R 


AXNUM 
PC ,READAX 
yf ha (R1)+ 


(R1)+ 
RAX16,(R1)+ 
1)+ 









F 
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CLEAR LULOUP 
: INIT POINTER TO — STORAGE TABLE 
: INIT AX REG BYTE NO. TO 0 

:READ 2 AX REG BYTES 


E 8 
“PUT HI BYTE READ INTO TABLE 
; CLEAR UPPER errs OF TABLE ENTRY 
:INCR AX REG BYTE NO. 
;SEE IF ALL REGS READ YET 
BR IF NOT 


NESTON nana AX REG BYTE NO 
;RESTORE R 


GET EXTENDED REG NO. FOR PRINTOUT 
E TURN 


LEER REE RRR EERE RAE RRR R ARERR EERE ERE RE RRR RRR EEE 
:* OSIRDY = THIS SUBROUTINE CHECKS FOR THE PROPER STATES OF ORDY (REG 11) 
is AND OCOR (REG 17) AND REPORTS AN ERROR IF EITHER IS NOT PROPERLY SET 


** 
. 
-* 
° 

* 


te RETA 


pee IN BIT 0 (ORDY) AND BIT 1 (OCOR) OF THE WORD FOLLOWING THE 
IF 7iNE ERROR OCCURS, A RETURN IS MADE TO THE TEST, AT THE ADDRESS IN 


ITITITITI ITLL ILI TILT T TTT L LL LLL TLE E ETT 


OSIRDY: MOV 


REGNUM, - (SP) 
SUBRPC ,- (SP) 
es 

4(SP) , SUBRPC 
#4 , SUBRPC 
#11 ,REGNUM 
PC ,READLU 
o¥ T0,@4 (SP) 
#MORDY ,REDBYT 
9$ 

PC,GETALL 


JS 
REPORT ORDY NOT SET 


ERRDF 


3$: BITB 


REPORT ORDY NOT C 
ERRDF 


7,EM7,ERR4 


16$ 
#ORDY ,REDBYT 
9$ 


PC,GETALL 
CLEARED 
8, Ema. ERR4 


SAVE LU REG NO. 


;SEE IF THIS IS A NESTED CALL 
;BR IF YES 


GET PC OF SUBROUTINE CALL 
:SET REG NO. TO 11 

:READ REG 11 

GET EXPECTED STATE OF ORDY 
7BR IF EXPECTED ORDY = 0 
;SEE IF ORDY = 1 


:BR IF ORDY = 
;GET REGS FOR PRINTOUT 






; TAKE ERROR RETURN 
‘SEE IF ORDY = 0 


;BR ORDY = “0 
:GET REGS FOR PRINTOUT 













an 


286 005016 
287 


300 
301 905112 
302 005116 
303 


304 
305 


BES 


WWNWNNWIWANINNWNWW 
ed ad aad a anh cn ed oe ce eed 
SOOWONAUSWN oO 

Ww 

= 

Ww 

Nm 


oO 
— 
w 
uw 
awoke 
NWA N NOOO 


000240 
000240 
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000020 
004500 


000002 
002346 
002362 


000002 
002352 
002400 


000310 
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002364 


002400 


000004 


9$: 


;REPORT 


12$: 


REPORT 


16$: 


208: 


238: 


BR 16¢ 

MOV #17 REGNUM 

JSR PC ,READLU 

BITB #B1T1,a4(SP) 

BEQ 12$ 

BITB #OCOR ,REDBYT 
20$ 

JSR PC ,GETALL 

CCOR NOT SET 

ERRDF 9,EM9,ERRS 
16$ 

B1TB #OCOR ,REDBYT 

BEQ 20$ 

JSR PC,GETALL 

OCOR NOT CLEARED 

ERRDF 10,EM10,ERR4 

MOV 2 (SP) ,REGNUM 

MOV PSTACK, SP 

MOV RE TADR,-(SP) 

BR $ 

ADD #2,4(SP) 

MOV (SP) +, SUBRPC 

MOV (SP) +, REGNUM 

RTS PC 


~ WORD ERRS 
; TAKE ERROR RE TURN 
*SET REG NO. 17 
sREAD LU REG 17 
;GET EXPECTED STATE OF OCOR 
“BR IF EXPECTED OCOR = 
; E IF OCOR = 1 
F OCOR = 1 
GET REGS FOR PRINTOUT 
TRAP CSERDF 
~ WORD - 
~ WORD EMS 
. WORD ERRG 
7 TAKE ERROR RETURN 
[SEE IF OCOR = 0 
‘BR IF OCOR = 0 
:GET REGS FOR PRINTOUT 
TRAP CSERDF 
. WORD 10 
. WORD EM10 
. WORD ERR4 


RESTORE LU REG NO. 
RESTORE STACK a TO BASE LEVEL 
3F IX ERROR RETURN P 


7FIX UP ERROR-FREE RETURN PC 


:RESTORE LU REG NO. 
RETURN 


REAR EAAEKEAAATEREAAAAEATARAARARARARAARAARAAREREHARARARREAREREREER ERR RRERARE KEES * 


>* WAITSO = THIS SUBROUTINE STALLS FOR AT LEAST SO MICRO-SEC, 


AND THEN RETURNS. 


REAR RAAARAERAORAAERERAARARAEAAERERAAAAAAAERAAAERAARAAAERERREHERRER ARERR RE RENEE 


WAITSO: 
3$: 


MOV 
MO 


R1,-(SP) 
#200. ,R1 
R1 


3$ 
(SP)+,R1 
PC 


SAVE R1 
; INIT COUNTER 


;DECREMENT COUNTER 


BR IF -_ 4 DONE YET 


a ty ll 
RE TURN 


SF AAAAAAAAAAAARAAAAERAHRORAERARHHHARRHRERAHERKRRHKAKRAReKeeReneneeteneeeeennneresens 


:* STALL = THIS SUBROUTINE STALLS FOR ABOUT A MICRO-SEC. 


"RRARERAAAEAAR AERA ARAAARAARARARAREARERARAARAERRERERAHHRRRRRRREEKRERH Eee eheeeeeenekeeeeneee 


STALL: 


NOP 
NOP 





Qo 
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327 005142 
328 005144 


000240 
000207 


013746 


010146 
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002400 
002366 


RTS 


STARA AARAAAAAAKARRRARAAAARRARARRAARARRERAERORARARHARARAREREREARRERAAEHERERRAEREHHAREE 


;* LDTXSI] = THIS SUBROUTINE LOADS THE TX SILO (REGS 10,11) WITH THE DATA PASSED 


i IN BITS 0-11 OF TXWORD. 


AeA eA RRR RRRRRRRRASARARRAASASARRARR ERE RERASRRRR RRR RRR RS RR RRR RRR RRR RRR RRS RRS EE S| 


LDTXSI: MOV 


REGNUM, = (SP) 


#170000, TXwORD 


#11,REGNUM 


oR 
TXWORD , WRIBYT 
PC ,WRITLU 
(SP) + ,REGNUM 


TXWORD +1 peat 
WR 


SAVE LU REG NO. 

[CLEAR UNUSED BITS 

SET REG NO. = 11 

:SET DATA TO BE ards INTO REG 11 
;LOAD DATA INTO REG 1 

7 SET REG NO. = 10 

;SET DATA TO BE on i INTO REG 10 
[LOAD DATA INTO REG 10 


;RESTORE LU REG NO. 
RETURN 


FRERAAAAAAAERARAARARAEAARAAAEKAEAAEAEAEAERERAAAEERAERERAEARARARAEARAERAREKREARARKERAREER EKER 


:* STPLU = THIS SUBROUTINE CLOCKS THE LINE UNIT 4 THE NO. OF CYCLES PASSED 


i+ IN BITS Q-14 OF THE WORD FOLLOWING THE CAL 
:* IF BIT 15='1..A CHECK IS MADE TO DETERMINE IF THE USYRT CHIP TYPE 
:* REQUIRES DECREMENTING THE NO. OF CYCLES BY 1. 
FRA AAAAARAAARERAAA AERA RAAAEAERAAERAERERAAEERAEAAERRAEAEAAERAERAEEREREERER HR KE REE EES 
STPLU: MOV —-R1,=(SP) SAVE R1 
MOV @2(SP),R1 GET DESIRED NO. OF CYCLES 
BEQ 6$ IF DESIRED CYCLES = 0, N 
BPL 2$ SBR IF CHIP TYPE CHECK NOT NECESSARY 
BIC #B1115,R1 :CLEAR FLAG BIT 
TST CHPT YP SEE IF SIG USYRT 
BEQ 2s BR IF YES 
DEC R1 :DECREMENT CYCLE COUNT 
23: BISB #LULOOP,@BSEL1 SET LU LOOP BIT 
3$: BISB —ASTEPLU-@BSEL1 SET THE STEPLU BIT (CLOCK THE TRANSMITTER) 
JSR PC, STALL : STALL 
BICB #STEPLU. @BSEL1 CLEAR THE STEPLU BIT (CLOCK THE RECEIVER) 
JSR PC.STA : STALL 
DEC :DECREMENT CYCLE COUNTER 
BNE 5s BR IF NOT DONE YET 
68: ADD #2,2(SP) FIX UP RETURN PC 
MOV (SP) +,R1 RESTORE R1 
RTS PC > RE TURN 


-RRARAEARARARHERHRAERERAAARAARARAAAARAERAERARERAARAARARERAEHERRERAEHRRREERERE RAR eheeeeee 


>* QACTIV = THIS SUBROUTINE CHECKS FOR THE PROPER STATE OF OACT (REG 11) AND 


an 
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384 i* REPORTS AN ERROR IF IT IS NOT PROPERLY SET TO THE STATE OF BIT O IN THE 

385 te WORD FOLLOWING THE CALL. 

386 {REAR AAAAAAARAAAAAAAERAARAARAARARARARAARARHARAAHARAAAHAEHARAAAARAEHAAAAEATAAEEREEE 

387 005324 013746 002400 OACTIV: MOV REGNUM, = (SP) ;SAVE LU REG NO. | 

388 005330 013746 002352 MOV SUBRPC ,-( SP) 

389 005334 005737 002352 TST SUBRPC sSEE IF THIS IS A NESTED CALL 

390 005340 1 BNE 1$ ;BR IF YES 

391 005342 016637 000004 002352 MOV 4(SP) , SUBRPC 

392 005350 162737 000004 002352 SUB #4 , SUBRPC ;GET PC OF SUBROUTINE CALL 

393 0053 012737 000011 400 1$: MOV #117,REGNUM ;SET REG NO. = 17 

394 005 004737 003644 JSR PC,READLU ;READ REG 11 

395 0053 032776 000001 000004 BIT wRiTO, a4 (SP) sGET EXPECTED STATE OF OACT 

396 005376 001413 BEQ 3$ 7BR IF EXPECTED OACT = 0 

397 005400 132737 000100 002364 BITB #OACT ,REDBYT 7SEE IF OACT 1 

398 005406 001031 9$ ‘BR IF OACT = 4 

399 005410 7 004500 JSR PC ,GETALL ;GET REGS FOR PRINTOUT 

4 sREPORT OACT NOT SET 

401 005414 ERRDF 17,EM11, ERRS 
05414 104455 TRAP CSERDF 
005416 00001 ~ WORD 11 
005420 012444 . WORD EM11 
005422 015576 -WORD ERR 

402 005424 000412 BR 6$ ; TAKE ERROR RETURN 

403 005426 132737 000100 002364 3$: BITS MOACT ,REDBYT SSEE IF OACT = Q 

404 0054 001416 BEQ 9$ ‘BR IF OACT = 0 

405 005436 004737 004500 JSR PC,GETALL GET REGS FOR PRINTOUT 

406 ZREPORT DACT NOT CLEARED 

407 005442 ERRDF 12,EM12,ERRS 
005442 104455 TRAP CSERDF 
005444 000014 .~ WORD 12 
005446 012461 .~ WORD EM12 
005450 015576 -WORD = ERRG 

408 005452 016637 000002 002400 6$: MOV 2(SP) ,REGNUM sRESTORE LU REG NO. 

409 005 013706 002346 MOV PSTACK,SP RESTORE PROGRAM STACK TO BASE LEVEL 

410 013746 002362 MOV RETADR,-(SP) sF IX UP ERROR RETURN PC 

411 005470 0 BR 12$ 

412 005472 766 000002 000004 9$: ADD #2,4(SP) sFIX UP ERROR-FREE RETURN PC 

413 005500 012637 002352 MOV (SP) +, SUBRPC 

414 005504 012637 002400 MOV (SP) +,REGNUM sRESTORE LU REG NO. 

sat 005510 000207 12$: RTS PC RETURN 

41? | 

418 

419 

420 

421 LEAR AAAAAAAAAAAEAARERAERARAARAERAAAAAAAAAAAAAAAAREATAEARARARRERARERRERERERRE EEE ES 

422 * INITRN - THIS SUBROUTINE INITIATES TRANSMISSION OF A MESSAGE, BY DOING A 

423 . MASTER CLEAR, LOADING AX2-15 AND REG 17 WITH THE DATA PASSED IN THE 2 

424 i* WORDS FOLLOWING THE CALL, LOADING 2 SOM CHARS INTO THE TX S SILO, AND 

425 :* CLOCKING THE LINE UNIT UNTIL THE FIRST SYNCH OR FLAG HAS BEEN SERIALIZED 

426 * IN THE USYRT. | —- MONITORS ORDY,OCOR, AND OACT FOR VALID STATES, 

427 if THROUGHOUT THE PROCESS 

428 i* IF THE SUBROUTINE DETECTS AN ERROR, A RETURN IS MADE TO THE TEST, AT THE 

429 ;* ADDRESS CONTAINED IN RETADR. 

430 FTAA AAAAAAAAAAAAAERAAARAEAAAARARAKAAERARAKARERERHERE AKER eRe RKeeeeeeeKeReseeeene 

431 005512 010146 INI TRN: MOV R1,-(SP) ZSAVE R1 

432 005514 013746 0024600 MOV REGNUM, ~ (SP) ;SAVE LU REG NO. 
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433 005520 


013746 


002402 
000006 
000004 
003576 
004634 


005324 
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174526 


002364 
174500 


002400 
002364 


002430 
174414 


000006 


6$: 


9$: 


12$: 


AXNUM , = (SP) 
6(SP) , SUBRPC 
#4 , SUBRPC 
PC,MSTCLR 

PC ,OSIRDY 


PC,OACTIV 


#4 ,AXNUM 
@6 (SP) ,WAX15 


a6 (SP) ,WRIBYT 
PC ,WRITLU 
PC-LDTXSI 
PC,LDTXSI 
PC ,WAi T50 
PC,OSIRDY 


PC,OACTIV 


R1 

#11 ,REGNUM 
#LULOOP, aBSEL 1 
#STEPLU, @BSEL1 
PC,STALL 

PC ,READLU 
WOACT, -REDBYT 


$ 
#STEPLU, @BSEL1 
PC,STALL 


R1 
R1,43 

$ 
PC,OACTIV 
#17 REGNUM 
CHPTYP 


PC ,READLU 
#OCOR ,REDBYT 
12$ 


#1,CHPTYP 
#STEPLU, @BSEL1 
PC, STALL 
PCOSIRDY 


#2,6(SP) 


SAVE AX BYTE NO. 


:GET PC OF SUBR CALL 
; ISSUE A MASTER CLEAR 
;CHECK ORDY=1, OCOR=0 


;CHK OACT=0 


SET AX BYTE NO. = 4 FOR AX2 

:SET DATA BYTE TO LOAD INTO AX2=15 
7SET TSOM BIT 

[SET SYNCH CHAR 


;LOAD AX2 

:SET REG NO. = 17 

; INCR POINTER TO NEXT DATA BYTE 

: SET DATA BYTE TO LOAD INTO REG 17 
LOAD REG 17 

[LOAD THE SILO WITH SOM CHAR 

SLOAD ANOTHER SOM INTO SILO 

;WAIT FOR DATA TO RIPPLE 

:CHK ORDY=1, CCOR=1 


CHK FOR OACT = 0 


INIT CYCLE COUNTER 
7SET LU REG NO. = 11 


OCK 
; STALL Ay : cies: 
SREAD REG 1 
:SEE IF ACT = 1 YET 
7BR IF OACT = 1 
: CLEAR CLOCK BIT 
:STALL FOR A at ala 
:INCR CYCLE COUN 
[SEE IF 3 CYCLES "Done YET 
BR IF NOT 


CHK FOR OACT = 1 


;SET REG NO. = 17 
[CLEAR USYRT CHIP INDICATOR 
[READ REG 17 
;CHK FOR OCOR CLEARED YET 
7BR IF YES - IT IS SIG CHIP 
SET INDICATOR FOR OTHER CHIP TYPE 
CLEAR CLOCK BIT 
>STALL FOR MICRO-SEC 
CHK FOR ORDY = 1, OCOR = 0 


3F 1X UP RETURN PC 
SRESTORE AX BYTE NO. 
;RESTORE LY REG NO. 
RESTORE R 

CLEAR SUBR CALL PC 
; RETURN 


74 


ane 


490 

491 

492 

493 

49% 

495 

496 

497 

498 

499 

500 

501 

502 

503 

504 

505 006074 

506 006076 

507 006100 

508 006106 

509 006114 

510 006122 

511 006126 

512 006132 

513 006140 

514 006142 

515 006146 

516 006150 

517 006152 

518 006156 

519 006162 

520 006164 

521 006166 

522 006172 

523 006174 

524 006176 

525 

526 006204 
006206 

528 006212 

529 006214 

530 006216 

531 006220 

532 006224 

533 006226 

534 006234 

535 006240 

536 006242 

537 006244 

538 

539 

540 

541 

542 

543 

544 

545 

546 


010146 
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000004 
000004 
000004 
005146 
005120 
000002 


000004 


100000 
002430 


005324 


004634 
005226 


004634 


000002 
002352 
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{EAAARARERARERARAAAARARARRH 
‘* TXCHAR = THIS SUBROUTI 
te THE TX SILO WITH 
* AND CLOCKS THE LI 
* OF THE SECOND WORD 
‘+ BY 

. OCOR, pa OACT T 
* IF AN ERROR IS DE 


DE wr IF THE 
PROGRAM 


CAARERAAARERARARERERAA AERA ATER AREER EKER A ARATE 
NE INITIATES TRANSMISSION OF A CHARACTER, BY LOADING 
DATA PASSED IN BITS 0-11 OF THE WORD FOLLOWING THE CALL 
NE UNIT WITH THE NUMBER OF CYCLES wy: IN BITS 0-14 

FOLLOWING THE CALL. IF BIT 1 A CHK IS MADE TO 
USYRT CHIP TYPE REQUIRES DECREMENT ING THE NO. OF CYCLES 
CHECKS FOR VALID STATES OF ORDY 

T THE PROCESS. 

TECTED, A RETURN IS MADE TO THE TEST, AT THE ADDRESS 


ind CONTAINED IN RETADR. 


[ERA AAERAERARAEREAREKER 


TXCHAR: MOV 
MOV 


JSR PC,LDTXS] 
JSR PC; WAIT5SO 


ADD #2,4(SP) 
CLR R1 
MOV a4(SP) ,R2 
TST R2 
BPL 9$ 
BIC #B1T15,R2 
TST CHPTYP 
BEQ 9$ 
DEC R2 

9$: = PC,OACTIV 
CMP R1,R2 
BEQ 12$ 
= PC,OSIRDY 
= PC,STPLU 
INC R1 
BR 9$ 

12$: = PC,OSIRDY 
ADD #2,4(SP) 
CLR SUBRPC 
MOV (SP)+,R2 
MOV (SP)+,R1 
RTS PC 


LS TAAAAAARARARAAARAAKRRREHE 


;* ENDTRN ~- THIS SUBROUTINE CLEARS THE TRANSMITTER BY SETTING OC. 


‘© WAITS FOR 50 US, 


LS AAAAAAARAAAARAEAKERAERKE 


POPPE PT Teer TTT eT TTT ToT TTT Teer Te TT TTT TTT TT TTT TTT TTT TTT 
s SAVE R1 
sSAVE R2 


GET PC _OF SUBR 


C CAL 
WORD sie DATA TO BE TRANSMITTED 


OAD THE TX SILO WITH THE DATA 
‘UAIT FOR DATA TO RIPPLE DOWN SILO 
;INCR POINTER 
SINIT CYCLE COUNT 
ZGET DESIRED NO. OF CYCLES 
;SEE IF CHIP TYPE CHK SHOULD BE MADE 


:BR IF NOT 
;CLEAR FLAG BIT 

> SEE , SIG USYRT 
BR IF YES 


DE CREMENT NO. OF CYCLES 
7CHK OACT = 1 


;SEE IF REQUIRED CYCLES DONE YET 
BR IF YES 


‘CHK ORDY=1, OCOR=1 


STEP LU ONE CYCLE 
7; INCR CYCLE COUNT 
CHK ORDY=1, OCOR=0 


FIX UP RETURN PC 
;CLEAR SUBR CALL PC 
RESTORE R2 
;RESTORE R1 

RETURN 


[ARR RARASALAREARARARARR RA RAR RRR RERARRRARRR RAR RRA AR ASSES OB | 


THE PROGRAM 
AND CHECKS FOR ORDY=1, OCOR=0, CACT=0, RTS=0. 


[ARR RERRRRRSAASARRRR RRR RRR RR RR RRR RRRR RRR RRR RRR RRR RASS SSS | 


an 


CZDMRB M8203 STATIC DIAG #1 
SUBROUTINES 


GLOBAL 


010146 


913746 


002400 
000004 
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ENDTRN: MOV R1,-(SP) :SAVE R1 
MOV REGNUM,=(SP) = SAVE _LU REG NO. 
002352 MOV 4 (SP) , SUBRPC 
002352 SUB #4, GET PC OF SUBROUT INE CALL 
002400 MOV #11 ,REGNUM “SET LU REG NO. 
002366 MOV #OC .WRIBYT SET OC IN DATA 
JSR PC, WRITLU ZSET OC IN REG 11 
JSR PC; WAITSO SSTALL FOR >50 US. 
WSR PC. OSIRDY ‘CHK ORDY=1, OCOR=0 
JSR PC,OACTIV :CHK OACT = 0 
002400 MOV #13,REGNUM :SET REG NO. = 13 
JSR PC ,READLU [READ REG 13 
002364 BIT #RTS ,REDBYT : CHK FOR RTS = 0 
BEQ 3$ BR IF RTS = 0 
JSR PC, GETALL “GET REGS” FOR PRINTOUT 
:REPORT RTS NOT CLEARED 
ERRDF  65,EM65,ERR4G 
TRAP — CSERDF 
.WORD 65 
“WORD EM65 
WORD ERR 
38: CLR SUBRPC :CLEAR SUBR CALL PC 
MOV (SP)+,REGNUM § :RESTORE LU REG NO. 
MOV (SP)+-R1 “RESTORE R1 
RTS PC ‘RETURN 
LRA EEA ERE EERE REEREAAEEREREEREERAREEAEEEAE RARER EEREE EERE 
* ISIRDY - THIS SUBROUTINE CHECKS FOR THE PROPER STATES OF ICIR (REG 17) 
ie AND IRDY (REG 12) AND REPORTS AN ERROR IF EITHER IS NOT PROPERLY SET 
ie AS PASSED IN BIT 0 (ICIR) AND BIT 1 (IRDY) OF THE WORD FOLLOWING THE 
** 
i* IF AN ERROR OCCURS, A RETURN IS MADE TO THE TEST AT THE ADDRESS 
** 
i esstattaiebsecstenes estlireteieetteiteantilakegilcietietneiiaiadeiahlinliacriaaialasiie saan 
TSIRDY: MOV REGNUM,-(SP)  : SAVE LU REG NO. 
MOV SUBRPC;-(SP) 
TST SUBRPC ZSEE IF THIS IS A NESTED CALL 
BNE 1$ “BR IF YES 
002352 MOV 4 (SP) , SUBRPC 
002352 SUB #4, SUBRPC :GET PC OF SUBR CALL 
002400 1$: MOV #12,REGNUM >SET REG NO. TO 12 
JSR PC ,READLU [READ REG 12 
000004 BIT #B1T1,a4(SP) :GET EXPECTED STATE OF IRDY 
BEQ 3$ BR IF EXPECTED IRDY = 0 
002364 BITB #IRDY,REDBYT  :SEE IF IRDY = 
BNE 9 “BR IF IRDY = 
PC, GETALL °GET REGS FOR PRINTOUT 


JSR P 
REPORT IRDY NOT SET 
ERRDF 17,EM17,ERR4 
TRAP CSERDF 
-WORD 17 





on 
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TINE 


BR 

BITB 

BEQ 
JSR 


16$ 

#IRDY ,REDBYT 
9$ 

PC, ate 


IRDY NOT CLEAR 


ERRDF 


18, EMIB. ERR4 


16$ 

#17 ,REGNUM 
PC ,READLU 
| T0,@4 (SP) 


#ICIR,REDBYT 
0$ 
PC,GETALL 


JSR 
ICIR NOT SET 


ERRDF 


ICIR NOT 


ERRDF 


19,EM19, ERRS 


16$ 
#1CIR,REDBYT 
20$ 


PC,GETALL 
CLEARED 
20,EM20,ERR4 


2(SP) ,REGNUM 
PSTACK,SP 
RETADR,~(SP) 
23$ 


#2,4(SP) 
(SP) +, SUBRPC 
Sa +, REGNUM 


M 
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; TAKE ERROR EXIT 
SEE IF IRDY = 0 


7BR IF IRDY = 0 
GET REGS FOR PRINTOUT 


; TAKE ERROR ade 
7SET REG NO, = 17 

SREAD REG 17 

GET EXPECTED STATE OF ICIR 
7BR IF EXPECTED ICIR = 0 

: SEE r ir.” 1 


IF ICI 1 
“GET REGS FOR PRINTOUT 


: TAKE ERROR RETURN 
:SEE IF ICIR = 0 

7BR IF ICIR = 0 

GET REGS FOR PRINTOUT 


sRESTORE LU REG NO. 
SRESTORE STACK POINTER TO BASE LEVEL 
:FIX ERROR RETURN PC 


FIX UP ERROR-FREE RETURN PC 


RESTORE LU REG NO. 
RE TURN 


mA AA REAR EERE RRERRE SAAR ASEEERRRSEE RRR ELAR E REESE RRR R ESLER RRR SEER RRR RE RES ERS SE SE | 


se Gh ceaty BA 'g SUBROUTINE CHECKS FOR THE PROPER STATE OF JACT (REG 12) AND 


WORD FOLLOWING THE CALL 
IF AN ERROR OCCURS, A RETURN IS MADE TO THE TEST AT THE ADDRESS IN 


RETADR. 


TS AN ERROR IF IT IS NOT PROPERLY SET TO THE STATE OF BIT 0 iN. THE 


MmORRBRESSSASZASEASSSELE RE RE SERRE REE RRR ERE R RRR RRR R RRR EEE RR RE RES RRR SERS R ER RRR RR EEE 


013746 IACTIV: MOV 


REGNUM, ~ (SP) 


7 SAVE LU REG NO. 





ao 
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013746 


000100 
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002364 


002400 


MOV SUBRPC , = (SP) 


TST SUBRPC ZSEE IF THIS IS A NESTED CALL 
BNE 1$ ‘BR IF YES 
MOV 4 (SP) , SUBRPC 
SUB 4, SUBRPC :GET PC OF SUBR CALL 

1$: MOV #12,REGNUM :SET REG NO. = 12 
JSR PC ,READLU TREAD REG 12 
Bl; WBITO,a4(SP) § :GET EXPECTED STATE OF IACT 
BEQ 3 “BR IF EXPEC TeD TACT = 0 
BITB @#IACT,REDBYT  :SEE IF IACT 
BNE 9$ [BR IF IA 


CT = e 
JSR PC ,GETALL ;GET REGS FOR PRINTOUT 
;REPORT IACT NOT SET 

ERRDF 21,E£M21,ERR4 


. WORD 
«WORD EM21 
«WORD ERR4 


BR 6$ ; TAKE ERROR EXIT 

3$: BITB #IACT ,REDBYT SEE IF IACT = 0 

BEQ 9$ :BR IF IACT = 0 
PC,GETALL ;GET REGS FOR PRINTOUT 


JSR 
;REPORT IACT NOT CLEARED 
ERRDF 22,EM22,ERR4 


- WORD 
«WORD EM22 
«WORD ERR4 


2(SP) ,REGNUM 
MOV PSTACK, SP 
MOV 4 age ticat 


#2,4(SP) 


RESTORE LU REG NO. 
;RESTORE PROGRAM STACK TO BASE LEVEL 
FIX UP ERROR RETURN PC 


FIX UP ERROR-FREE RETURN PC 
MOV (SP) +, SUBRPC 


MOV (SP) +,REGNUM RESTORE LU REG NO. 
12$: RTS PC RETURN 


IEICE IIOUIOIIIOIUIIIOIIOIUIIISISISIUIOIIOIIUIUISIOIIOIUIOISIIIUIUIDIOIUIDIOIIUIDIOIISIOIIIIUIN OD ittik 

;* RSEOM - THIS SUBROUTINE CHECKS FOR THE PROPER STATES OF RSOM AND REOM IN 

;* AXO-16, AND REPORTS AN ERROR IF EITHER IS NOT SET TO THE STATE PASSED IN BITS 
* 0,1, RESPECTIVELY, a 4 THE WORD FOLLOWING THE CALL. 

* IF AN ERROR OCCURS, A RETURN IS MADE TO THE TEST AT THE ADDRESS IN RETADR. 


SEEKER EKEREREEAEEREEKEEEEEAEKERKEEEEEEEEEEREEKEEKERKEEKEE 


RSEOM: MOV AXNUM, - (SP) ;SAVE AX BYTE NO. 
MOV SUBRPC ,-(SP) 
TST SUBRPC ;SEE IF THIS IS A NESTED CALL 
;BR IF YES 


BNE 1$ 

MOV 4 (SP) , SUBRPC 

SUB #4 , SUBRPC :GET ~ OF SUBR CALL 
1$: MOV #1, AXNUM 3 Hy. BYTE NO. FOR AX0-16 


PC ,READAX AXO 
BIT #B1T0,a4(SP) ‘CET EXPECTED STATE OF RSOM 
BEQ 3$ BR IF EXPECTED RSOM = 0 


ao 
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690 007130 
691 007136 
692 007140 
693 


007236 
709 007240 
710 007242 
711 007250 
712 007252 
713 
714 007256 
007256 
007260 
007262 
007264 


715 007266 
716 007274 


000001 
004500 


000001 
004500 


000002 
000002 
004500 


000002 
004500 


000002 
002346 
002362 


000002 
002352 
002402 
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002372 


002372 


000004 
002372 


002372 


002402 


000004 


;REPORT 


3$: 


;REPORT 


9$: 


ZREPORT 


12$: 


;REPORT 


16$: 


20$: 


23$: 


PAAR ARERE RARER EAERERERREREERERAREAEREREERERAEREAERERARAERERAARERAEEEARE RARER aeeene 


B1TB #RSOM,RAX16 
BNE 9$ 


JSR PC,GETALL 
RSOM NOT SET 
ERRDF  29,EM29,ERR6 


16$ 
BITB #RSOM,RAX16 
BEQ 9$ 
JSR eg Seeh 


RSOM NOT C 
ERRDF 28. EMSB, ERR6 


BR 16$ 

BITB —s 
B1TB #REOM,RAX16 
BN 


JS PC,GETALL 
REOM NOT SET 
ERRDF 31,€M31,ERR6 


BR 16$ 
BITB #REOM,RAX16 
20$ 


JSR PC,GETALL 
REOM NOT CLEARED 
ERRDF 30,E€M30,ERR6 


MOV 2 (SP) , AXNUM 

MOV PSTACK,SP 

MOV RETADR,-(SP) 
23$ 


BR 

ADD #2,4(SP) 

MOV (SP) +, SUBRPC 
MOV | acacia 


;SEE IF RSOM = 1 
7BR IF RSOM = 1 
;GET REGS FOR PRINTOUT 


; TAKE ERROR EXIT 
7 SEE y RSOM = 0 


:BR IF RSOM = 
;GET REGS FOR PRINTOUT 


AKE ERROR 


RETURN 
Get EXPECTED STATE OF REOM 
REOM = 0 


:BR IF EXPECTED 
;SEE IF REOM = 1 


:BR IF REOM = 1 
GET REGS FOR PRINTOUT 


3F1X UP ERROR-FREE RETURN PC 
RESTORE AX BYTE NO. 
TURN 


; TAKE ERROR ry mw 


7SEE IF REOM 
:BR 


IF REOM = 0 
;GET REGS FOR PRINTOUT 


RESTORE AX BYTE 


SEQ 


NO. 
sRESTORE STACK a aye TO BASE LEVEL 


FIX ERROR RETURN P 


79 


CSERDF 
29 


EM29 
ERR6 


CSERDF 
28 


EM28 
ERR6 


CSERDF 
31 
EM31 
ERR6 


CSERDF 
30 


EM30 
ERR6 


i* * RDRXS] - THIS SUBROUTINE READS THE RCV SILO (REGS 10,12) AND RETURNS THE 
SILO ENTRY IN BITS 0-11 OF RXWORD. 


L 


732 007326 
733 007332 
734 340 


738 007366 
739 007372 
740 007400 
741 007404 


7 5 
787 007556 


CZDMRB M8203 STATIC DIAG #1 
GLOBAL SUBROUTINES 
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002424 


002352 
002352 
002400 


002364 


RERAEARRREREREERAERAEAAEEEAERAEKAAAARAAARARRERRERHERAERERARERERERARARARRAEAARHARHEEHEE 


RDRXSI: MOV 
MO 


REGNUM, = (SP) 
ack REGNUM 


#10,R 
PC ,READLU 


REDBYT ,RXWORD 
(SP) + ,REGNUM 


PC 


READLU 
REDBYT RXWORD+1 
#170006, RXWORD 
REGNUM 


;SAVE LU REG NO. 

7SET REG NO. = 12 

READ LU REG 12 

GET HI BITS OF zee ENTRY 
CLEAR UNUSED BITS 

SET REG NO. = 10 

READ 


REG 10 
GET LOW BITS OF SILO ENTRY 
RESTORE LU REG NO. 
TURN 


—MARRBARASAASZALA£LA£LAS ERLE ESAS ARERR RARER ARERR RRA RRR RRR A RRR SARS ERA RRA RASA RSD S SS DS 


7 RCV1ST_ = THIS SUBROUTINE RECEIVES ap FIRST CHAR OF A MESSAGE, AND MONITORS 


STATUS OF THE RECEIVER. FIRST, 


THE 
OF CYCLES PASSED IN THE WORD FOLL 
ETURN 


A CHECK IS MADE FOR IACT = 0, IRDY = 0, 


- THEN, THE LINE UNIT IS CLOCKED 
PROGRAM 


USING 
CHECKS FOR THIS TO OCCUR WITHIN 5 
OWING THE CALL. 
IS MADE TO THE TEST, AT THE ADDRESS 


MARAAASRARAASASALALAASSLELRALASARS RR SALER ERE R ERE RA RAR RAR RRR R RRR RRR R RRR RRR RRA SSS DO 


. ICIR = 1, AND RSOM = 
:* STEPLU UNTIL IRDY = 
:* CYCLES AFTER THE NO. 
:* IF AN ERROR OCCURS, A 
:* CONTAINED IN RETADR. 
RCV1ST: MOV R1,=(SP) 

MOV R3,-(SP) 

MOV REGNUM, - (SP) 

MOV 6(SP) . SUBRPC 

SUB SUBRPC 

MOV a5. REGNUM 

CLR R1 

MOV a6 (SP) ,R3 

ADD #3,R3 

TST a6 (SP) 

BEQ 8$ 

JSR PC, IACTIV 

SR PC, ISIRDY 

JSR PC,RSEOM 
6$: SR PC,STPLU 
8$: JSR PC ,WAITSO 

INC R1 

JSR PC ,READLU 

BITB  #IRDY,REDBYT 

BNE 9$ 

CMP R1,R3 

BLT $ 

SR PC, ISIRDY 
9$: CMP R1,a6(SP) 

BGE 1 

JSR PC, ISIRDY 


SAVE R1 

i SAVE R3 

;SAVE LU REG NO. 

GET PC OF yee CALL 
7SET_LU REG NO 12 

: INIT CYCLE COUNT TO 0 
:GET CYCLE COUNT LIMIT 
:SEE id —- CYCLES = 0 


> CHK FOR IACT = 0 


:CHK FOR ICIR = 1, IRDY = 0 
;CHZ RSOM = 0, REOM = 


0 IN AX0-16 
:CLOCK LU FOR 1 CYCLE 


sALLOW SILO DATA TO RIPPLE 
: INCREMENT CYCLE COUNT 
EAD REG 12 


:R 
iSEE IF ~ 1 YET 
:BR IF 1 
: SEE IF LIMIT EXCEEDED 
IF NOT YET 
[CHK FOR ICIR = 1, IRDY = 1 
a LESS THAN REQUIRED CYCLES 
CHK FOR ICIR = 1, IRDY = 0 
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8 
8 
8 
8 
8 
8 
8 
8 
8 
8 


ed ca cad a ed cd ad etd ced ed 
WODWNAULSWN—O 


8 


844 007760 








006666 12$: PC, JACTIV CHK FOR IACT = 
006402 : PC, ISIRDY CHK FOR ICIR = 


000002 #2,6(SP) 3FIX_UP RETURN PC 
002400 . RESTORE LU REG NO. 
SRESTORE R3 
sRESTORE R1 
002352 CLEAR SUBR CALL PC 
TURN 


BOPP eee Crier iii iii itt iii iti titi t iii it itt titi tit iti ttt 
;* STPERR = THIS SUBROUTINE eet THE CONTENTS OF THE FIRST WORD FOLLOWING THE 
CALL wan't REG 17, AND SETS THE IERR BIT, AND CLOCKS THE LINE UNIT 
FOR THE NO. OF CYCLES PASSED IN THE 2ND WORD FOLLOWING THE CALL. THEN, 
IT RESTORES REG 17 TO ITS ORIGINAL CONTENTS, CLEARING THE IERR BIT. 
jSHRESAARRRERAARERNARERREERERERERARRERERRRREERARRERERRREEER ERE REE ERE EE EES 
013746 REGNUM, - (SP) ;SAVE LU REG NO. 
00001 2400 MO #17.,REGNUM ;SET LU REG NO. = 17 
ES WRIBYT 
#IERR,WRIBYT 
PC WRIT ;SET IERR BIT IN REG 17 
2,2 (SP) : INCREMENT SUBR ARGUMENT POINTER 
a2(SP) ,3$ :GET DESIRED NO. OF CYCLES 
PC, STPLU :CLOCK LU FOR DESIRED NO. OF CYCLES 
:NO. OF CYCLES GOES HERE 
inka 


:CLEAR IERR BIT IN REG 17 
FIX UP RETURN PC 

(SP) +, REGNUM RESTORE LU REG NO. 

PC RETURN 


FAA RERREREEREEEEREREREEEREEREEREEERERREAEEREEAEEEEEREREEREREAKERER RE 
:* CKDATA = THIS SUBROUTINE READS THE RCV SILO AND COMPARES THE SILO ENTRY 
TO BITS O-11 OF THE FIRST WORD FOLLOWING THE CALL. IF THERE 15 A 
MISMATCH, THE ERROR IS REPORTED AND A-RETURN IS MADE TO THE TEST AT THE 
ADDRESS CONTAINED IN RETADR. IF BIT 15 = 0 IN THE FIRST WORD 
OWING THE CALL, THE SUBROUTINE WILL NOT CHECK THE BCC BIT (SILO 
._IF THERE ARE NO ERRORS, THE LINE UNIT IS CLOCKED FOR THE 
NUMBER OF CYCLES PASSED IN THE SECOND WORD FOLLOWING THE CALL. 
+ ARR eRRRRRR EERE RRR ERR RERERERARRRRERERRRERRR ERR REE RRRER RRR RE REE 
CKDATA: MOV — R1,=(SP) SAVE R1 
MOV ——-REGNUM,-(SP) SAVE _LU REG NO. 
002352 4(SP) , SUBRPC 
002352 4,S GET PC _OF SUBR CALL 
MOV GET EXPECTED SILO ENTRY 
CLEAR UNUSED BITS FOR COMPARE 


C,RDRXSI >READ RCV SILO 
000347 SAVLEN, ATXLEN2! TXLENT ! TXLENO!RXLEN2!RXLENI »RXLENO 
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007766 001005 BNE 4$ :BR_IF CHAR LENGTH NOT = 7 

846 007770 042701 000200 BIC #B1T7,R1 :MASK OFF BIT 8TH BIT 

847 007774 042737 000200 002424 BIC #B1T7 ,.RXWORD 

848 010002 120137 002424 4$: CMPB R1,RXWORD COMPARE EXPECTED BITS 0-7 TO ACTUAL 
010006 001445 BEQ 6$ ;BR IF MATCH 

850 010010 005037 002404 CLR GOODAT 

851 010014 110137 002404 MOVB R1,GOODAT GET EXPECTED DATA 

2 010020 005037 002406 CLR BADDAT 

853 010024 113737 002424 002406 MOVB RXWORD ,BADDAT 2GE T ACTUAL oate 

854 010032 012737 000011 002400 MOV #11, REGNUM T REG NO. = 11 

855 010040 004737 003644 JSR PC ,READLU TREAD REG 11 

856 010044 132737 000001 002364 BITB MUNRR ,REDBYT sSEE IF mt. UNDERRUN ERROR 

857 010052 001410 BEQ 5$ BR IF 

234 010054 004737 004500 JSR PC,GETALL :GET REGS "FOR PRINTOUT 

;REPORT TX UNDERRUN ERROR 

860 010060 ERRDF 54,EM54,ERR4 
010060 104455 TRAP CSERDF 
010062 000066 -WORD 54 
010064 014162 -WORD EMS4 
010066 015576 -WORD ERR4 

861 010070 000137 010552 Jip 36$ TAKE ERROR EXIT 

862 010074 012737 000010 002400 5$: MOV #10,REGNUM :SET REG NO. = 10 

863 010102 004737 004500 JSR PC, GETALL GET REGS FOR PRINTOUT 

864 REPORT RCV'D DATA MISCOMPARE 

865 010106 ERRDF 34,EM34.ERR8 
010106 104455 TRAP CSERDF 
010110 000042 -WORD 34 
010112 013274 -WORD &M34 
010114 020076 -WORD ERR8 

866 010116 000137 010552 JMP 36$ ; TAKE ERROR EXIT 

867 010122 000301 63: SWAB R1 

868 010124 012737 000012 002400 MOV #12,REGNUM ;SET LU REG NO. FOR ERROR REPORTS 

869 010132 120137 002425 C R1,RXWORD+1 COMPARE EXPECTED SILO BITS 8-11 TO ACTUAL 

870 010136 001002 BNE 7$ BR IF MISMATCH 

871 010140 000137 010526 JMP 2e$ 3 CONT INUE 

872 010144 005037 002404 7$: CLR GOODAT 

873 010150 110137 002404 MOVB R1,GOODAT SET EXPECTED DATA 

874 010154 005037 002406 CLR BADDAT 

875 010160 113737 002425 002406 MOVB RXWORD+1,BADDAT ;SET ACTUAL DATA 

876 010166 032776 100000 000004 BIT WBCCCHK,@4(SP) ;SEE IF BCC SHOULD BE IGNORED 

877 010174 1433 BEQ 10$ BR IF YES 

878 010176 132701 000001 BITB #BCC,R1 7 SEE id EXPECTED BIT = 

879 010202 001014 BNE 8$ YES 

880 010204 132737 000001 002425 BITB WBCC.RXWORD+1  : SEE iF ACTUAL BIT = 9 

887 010212 001424 BEQ 10$ BR IF YES 

882 010214 004737 004500 JSR PC,GETALL GET REGS FOR PRINTOUT 

883 REPORT BCC NOT CLEARED 

884 010220 ERRDF 35,EM35,ERR8 
010220 104455 TRAP CSERDF 
010222 000043 -WORD 35 
010224 013322 -WORD £&M35 
010226 020076 -WORD ERR8 

5 010230 000137 010552 IMP 36$ ; TAKE ERROR EXIT 

886 010234 132737 000001 002425 8$: BITB WACC,.RXWORD+1  ;SEE IF ACTUAL BIT = 

887 010242 001010 -— 10$ [BR IF YES 

888 010244 004737 004500 PC,GETALL GET REGS FOR PRINTOUT 


;REPORT acc NOT SET 





ao 
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890 010250 ERRDF  36,6M36,ERRE 
010250 104455 TRAP CSERDF 
010252 000044 «WORD 36 
010254 013342 «WORD EM36 
010256 020076 «WORD ERR8 

891 Brosee 000137 010552 108 JMP 36$ ; TAKE ERROR EXIT 
010264 132701 000002 BITB WEBLK,R1 7 SEE ‘¢ EXPECTED BIT = 1 

894 010270 001014 BNE 12$ YES 

895 010272 132737 000002 002425 BITB #EBLK ,RXWORD +1 “SEE iF ACTUAL BIT = 0 

896 010300 001424 BEQ 14$ BR IF YES 

897 010302 004737 004500 JSR PC,GETALL GET REGS FOR PRINTOUT 

898 ;REPORT FBLK NOT CLEARED 

899 010306 ERRDF 37,€M37,ERR8 
010306 104455 TRAP CSERDF 
010310 000045 «WORD 37 
010312 013356 «WORD £EM37 
010314 020076 -WORD ERR8& 

900 010316 000137 010552 JMP 36$ ; TAKE ERROR EXIT 

901 010322 132737 000002 002425 12%: BITB +t main [SEE IF ACTUAL BIT = 1 

902 010330 001010 BNE 4$ BR IF YES 

903 010332 004737 004500 JSR PC. GE TALL GET REGS FOR PRINTOUT 

904 ;REPORT EBLK NOT SET 

905 010336 ERRDF 38,E&M38,ERR8 
010336 104455 TRAP CSERDF 
010340 000046 -WORD 38 
010342 013377 -WORD EM38 
010344 020076 -WORD  ERR8 

906 010346 000137 010552 JMP 36$ ; TAKE ERROR EXIT 

907 010352 14%: 

908 010352 132701 000004 BITB ARAB ,R1 SEE IF EXPECTED BIT = 1 

909 010356 001014 BNE 16$ 7BR IF Y 

910 010360 132737 000004 002425 BITS MRAB,RXWORD+1 ;SEE IF ACTUAL BIT = 0 

911 010366 001424 BEQ 18$ 7BR IF YES 

912 010370 004737 004500 JSR PC,GETALL GET REGS FOR PRINTOUT 

913 REPORT RAB NOT CLEARED 

914 010374 ERRDF 39,£M39,ERR8 
010374 104455 TRAP CSERDF 
010376 000047 -WORD 39 
010400 013414 -WORD EM39 
010402 020076 -WORD ERR8 

915 010404 000137 010552 JMP 36$ ; TAKE ERROR EXIT 

916 010410 132737 000004 002425 16%: BITB MRAB,RXWORD+1 ;SEE IF ACTUAL BIT = 1 

917 010416 001010 BNE 18$ ;BR_IF YES 

918 010420 737 004500 JSR PC,GETALL GET REGS FOR PRINTOUT 

919 REPORT RAB NOT SET 

920 010424 ERRDF 40,£M40,ERR8 
010424 104455 TRAP CSERDF 
010426 000050 -WORD 40 
010430 013434 -WORD EM40 
010432 020076 -WORD ERR8 

921 010434 000137 010552 JMP 36% ; TAKE ERROR EXIT 

922 010440 18$: 

923 010440 132701 000010 BITB #OVRR ,R1 sSEE IF EXPECTED BIT = 3 

924 010444 001014 BNE 2 7BR IF YES 

925 010446 132737 000010 002425 BITB MOVRR,.RXWORD*+1 ;SEF IF ACTUAL BIT = 0 
01 BEQ 22% SBR IF YES 
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927 010656 004737 604500 JSR PC,GETALL :GET REGS FOR PRINTOUT 

928 ;REPORT OVRR NOT CLEARED 

929 010462 ERRDF 41,EM41,ERRB 
010462 104455 TRAP —- CSERDF 
010464 000051 .WORD 41 
010466 013450 “WORD M41 
010470 020076 .~WORD ERR8 

930 010472 000137 010552 JMP 36$ : TAKE ERROR EXIT 

931 010476 132737 000010 002425 208: BITB  #OVRR,RXWORD+1] :SEE IF ACTUAL BIT = 1 

932 010506 001010 BNE 22% [BR IF YES 

933 010506 004737 004500 JSR os hides ;GET REGS FOR PRINTOUT 

93%4 ;REPORT OVRR NOT S 

935 010512 ERRDF 43° Em2, ERRB 
010512 104455 TRAP —- CSERDF 
010514 000052 .WORD 42 
010516 013471 ~ WORD EM42 
010520 020076 “WORD  ERR8 

936 010522 000137 010552 MP 36$ : TAKE ERROR EXIT 

937 010526 228: 

938 010526 062766 000002 000004 ADD #2,4(SP) ; INCR SUBROUTINE ARGUMENT POINTER 

939 010534 017637 000004 010546 MOV a4 (SP) ,24$ [GET DESIRED CYCLE COUNT 

940 010542 004737 005226 JSR PC,STPLU ;CLOCK LU FOR DESIRED CYCLES 

241 010546 000000 24$ “WORD 0 

942 010550 000407 BR 38$ : TAKE ERROR-FREE EXIT 

943 010552 011637 002400 26S: MOV (SP) ,REGNUM [RESTORE LU REG NO. 

944 010556 013706 002346 MOV PSTACK,SP ZRESTORE PROGRAM STACK TO BASE LEVEL 

945 010562 013746 002362 MOV RETADR,-(SP) sFIX UP ERROR RETURN PC 

946 010566 000406 BR 40$ 

947 610570 062766 000002 000004 38$: ADD #2,4(SP) sF IX UP ERROR-FREE RETURN PC 

948 010576 012637 002400 MOV (SP)+,REGNUM § :RESTORE LU REG NO. 

949 010602 012601 MOV (SP)+,R1 sRESTORE R1 

950 010604 005037 002352 408: CLR SUBRP( “CLEAR SUBROUTINE PC 

91 010610 000207 RTS PC RETURN 

953 

954 

955 

956 

957 FRAAARAAAAAAEKAEAREREAAERARARARERKEAEREAERERAAEAEERAAAARAEARARAARERAEARARAARARERERRER EES 

958 te SETUP - THIS SUBROUTINE LOADS THE FIRST WORD AFTER THE CALL INTO AX2-15 

959 te (SYNCH CHAR), LOADS THE SECOND WORD AFTER THE CALL INTO REG 17 

960 ;* LOADS THE THIRD WORD INTO AX3-15, AND LOADS THE FOURTH INTO AX3-16. 

961 FARRER EREREEEKREEEKRKERKEREARAAEREAAERARAERRRAEAERAEAEERARRAERERAEARAEERRE ERED 

962 010612 013746 002402 SETUP: MOV AXNUM , - (SP) ;SAVE AX BYTE NO. 

963 010616 013746 002400 MOV REGNUM, - (SP) SSAVE LU REG NO. 

964 010622 012737 000004 002402 MOV #4, AXNUM SSET AX BYTE NO. FOR AX2 

965 010630 017637 000004 002374 MOV @4 (SP) ,WAX15 

966 010636 005037 002376 CLR WAX16 

967 010642 004737 004264 JSR PC ,WRITAX :SET SYNCH CHAR IN AX2-15, CLEAR AX2-16 

968 010646 012737 000017 002400 MOV #17,REGNUM SET REG NO. = 17 

969 010654 062766 000002 000004 ADD #2,4(SP) < TNCREMENT ARGUMENT POINTER 

970 010662 017637 000004 002366 MOV a4 (SP) ,WwRIBYT 

971 010670 004737 003722 JSR PC ,WRITLU :LOAD REG 17 

972 010674 012737 000006 002402 MOV #6. AXNUM [SET AX BYTE NO. FOR AX3 

973 010702 062766 000002 000004 ADD #2.4(SP) ‘INCREMENT ARGUMENT POINTER 

974 010710 017637 000004 002374 MOV 04 (SP) . WAX15 

975 010716 062766 000002 000004 ADD #2, 4(SP) ; INCR ARGUMENT POINTER 
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976 010724 017637 000004 002376 MOV a4 (SP) ,WAX16 

977 010732 013737 002376 002432 MOV WAX16,SAVLEN — ;STORE TX AND RCV CHAR LENGTH 

978 010740 004737 004264 JSR PC WRI TAX SLOAD AX3=15, AX3-16 

979 010744 062766 000002 000004 ADD #2.4(SP) [FIX RETURN PC 

980 010752 012637 002400 MOV (SP)+,REGNUM §: RESTORE LU REG NO 

1 010756 012637 002402 MOV (SP) +” AXNUM “RESTORE AX BYTE NO. 

982 010762 005037 002352 CLR SUBRPC 'CLEAR SUBROUTINE PC STORAGE 

983 010766 000207 RTS PC ‘RETURN 

984 

985 

986 

987 

988 

9a9 FERARAARARAAERARAAARERARAREEHRRARKRERARRARARRAARARAARERERARARARRRARARRRERERS 

** LODMSG - THIS SUBROUTINE LOADS THE NO. OF WORDS PASSED IN THE SECOND WORD 

991 is FOLLOWING THE CALL FROM THE MSG BUFFER WHOSE ADDRESS IS IN THE FIRST 
992 * WORD FOLLOWING THE CALL, INTO THE TRANSMITTER SILO. 

993 FETA AAARAAARERARARRARARAAEERERKRARARRRERRAARARRRERARARRARREAARAARAAAERARARAERERAE EE 
994 010770 010146 LODMSG: MOV R1,-(SP) :SAVE R1 

995 010772 010246 MOV R2.-(SP) TSAVE R2 

996 010774 017601 000004 MOV a4 (SP) .R1 :GET MSG POINTER INTO R1 

997 011000 062766 000002 000004 ADD #2,4(SP) ‘INCR ARG POINTER 

998 011006 017602 000004 MOV a4 (SP) ,R2 SGET WORD COUNT INTO R2 

999 011012 062766 000002 000004 ADD #2,4(SP) ‘FIX UP RET 

1000 611020 012137 002422 6$: MOV <R1) +, TXWORD GET NEXT MSG WORD 

1001 011024 004737 005146 JSR PC LDTXS! ZLOAD A WORD INTO TX SILO 

1002 011030 005302 DEC R2 =DECR COUNT 

1003 011032 001372 BNE 6$ ‘BR IF NOT DONE YET 

1004 011034 004737 005120 JSR PC, WAITSO ;WAIT FOR SILO TO RIPPLE 

1005 011040 012602 MOV (SP) +,R2 “RESTORE R2 

1006 011042 012601 MOV (SP)+-R1 ‘RESTORE R1 

1007 011044 000207 RTS PC sRETURN 

1008 

1009 

1010 

1011 
1012 
1013 LEAR AARE ARERR AAERAARAAEAARAERKRAAEAAAAARARAKRARAARERARRAARRERAH ERS 
1014 ** RKCHAR = THIS SUBROUTINE READS THE RCV SILO AND CLOCKS THE LINE UNIT. 
1015 :* FIRST, all READS THE CHAR FROM THE RCV SILO, AND CHECKS FOR ICIR 
1016 te 1, IRDY = 0. IT THEN CLOCKS THE LINE wit FOR THE NO. OF CYCLES 
1017 i PASSED IN THE WORD FOLLOWING THE CALL, AND THEN CHECKS FOR ICIR 

yseiasesiinsnasclveoienreeseeststeaeniibnseunenteninhcasiceesamnetananinirheiiaiateteineteiiaintiteneinittiaetiod 

1020 011046 010146 RXCHAR: MOV R1,-(SP) :SAVE R1 

1021 011050 016637 000002 002352 MOV 2(SP) SUBRPC 

1022 011056 162737 000004 002352 SUB 4, SUBRPC :GET PC OF SUBR CALL 

1023 011064 004737 007326 JSR BC RDRXS I “READ RCV SILO 

1024 011070 004737 005120 JSR PC; WwAIT5O TALLOW SILO TO RIPPLE 

1025 011074 005001 CLR R1 ‘INIT CYCLE COUNT 

1026 011076 020176 000002 9$: CMP R1,a2(SP) >SEE IF REQUIRED CYCLES DONE YET 

027 011102 001410 BEQ 12$ 7BR IF YES 

1028 011104 004737 006402 JSR PC, ISIRL / ‘CHK ICIR = 1, IRDY = 0 

1029 011110 000001 1 

1030 011112 004737 005226 JSR PC. STPLU :CLK LU 1 CYCLE 

1031 011116 000001 1 
1032 011120 005201 INC R1 SINCR CYCLE COUNT 
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Ns 


Gk 

1033 011122 000765 Bk 9% 

1034 O111¢4 004757 006402 128: JSR —- PC, ISIRDY :CHK ICIR = 1 IRDY = 1 

1035 071130 000003 3 

1036 011132 062766 000002 000002 ADD =—s- #2, 2( SP) :FIX RETURN PC 

1037 011140 005037 002352 CLR SUBRPC CLEAR SUBR CALL PC 

1038 011344 012601 MOV (SP)+,R1 SRESTORE R1 

1039 017146 000207 RTS —s PC ; RETURN 

1040 

1041 

1042 

1043 

1044 

1045 FAA AAAAAAARAARARAARAAEAARARAAARAEARROREARARERRAERAEAEHERARAEAAERHERARARERARETHRAREES 

1046 * CKTBIT = THIS SUBROUTINE CLOCKS THE LINE UNIT FOR 8 CYCLES, AND AFTER EACH 

1047 . CYCLE, THE TXDATA BIT IN REG 17 IS EXAMINED, AND COMPARED TO A BIT OF 

1048 * THE CHAR PASSED IN THE WORD FOLLOWING THE CALL. 

1049 . IF AN ERROR OCCURS, A RETURN IS MADE TO THE TEST AT THE ADDRESS IN 

| * ° 

1051 USI eI Ite Stet iii i titi i titi iii i iii iti titiii titi titi itt t titi titi i ttt titi iii i is 

1052 011150 013746 002400 CKTBIT: MOV «REGNUM, =(SP) —; SAVE _LU REG NO. 

1053 011154 010146 MOV —R1, = (SP) SAVE R1 

1054 011156 016637 000006 002352 Mov  4($P) , SUBRPC 

1055 011164 162737 000004 002352 SUB #4, SUBRP ;GET PC OF SUBROUTINE CALL 

1056 011172 012701 000001 MOV - #BITO,R1 INIT BIT POINTER 

1057 011176 012737 000017 002400 MOV «#17, REGNUM SET REG NO. = 17 

1C58 011204 004737 005226 4$: JSR PC, STPLU CLOCK LINE UNIT 1 CYCLE 

1060 011212 004737 003644 JSR —- PC, READLU ;READ REG 17 
011216 030176 000004 BIT —-R1.@4(SP) SEE IF EXPECTED BIT = 1 

1062 011222 001013 BNE BR IF YES 

1063 011224 132737 000060 002364 BITB = #TXDATA,REDBYT SEE IF ACTUAL BIT = 0 

1064 011232 00142 BEQ 12$ BR IF YES 

1065 011234 006737 004500 JSR PC,GETALL ;GET REGS FOR PRINTOUT 

1066 ;REPORT TXDATA NOT CLEARED 

1067 011240 ERRDF 32, £M32,ERRG 
011240 104455 TRAP CSERDF 
011242 000040 WORD 32 
011244 013222 “WORD  EM32 
011246 015576 “WORD —- ERR4 

1068 011250 000420 BR 208 ; TAKE ERROR RETURN 

1069 011252 132737 000060 002364 98: BITB  #TXDATA,REDBYT SEE IF ACTUAL BIT = 1 

1070 011260 001007 BNE 12$ [BR IF YES 

1071 011262 004737 004500 JSR PC, GETALL GET REGS FOR PRINTOUT 

1072 ;REPORT TXDATA BIT NOT SET 

1073 011266 ERRDF  33,EM33,ERR4 
011266 104455 TRAP —CSERDF 
011270 000041 -WORD 33 
011272 013251 “WORD = EM33 
011274 015576 “WORD —_ ERR4 

1074 011276 000405 BR 208 ; TAKE ERROR EXIT 

1975 011300 006301 12$: ASL RI SHIFT BIT POINTER 

1076 011302 020127 000400 CMP sR}, #400 SEE IF 8 BITS SCANNED YET 

1077 011306 001336 BNE 4$ ZBR IF NO 

1078 011310 000405 BR 228 

1079 011312 013706 002346 208: MOV — PSTACK, SP RESTORE PROGRAM STACK POINTER TO BASE LEVEL 

1080 011316 613746 002362 MOV —s-RETADR.-(SP) =: FIX UP RETURN PC 

1081 011322 000406 BR 40$ 


- 
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1082 011324 062766 000002 000004 2c$: ADD #2,4(SP) 3F1X_UP a thc RETURN PC 

1083 011332 012601 MOV (SP)+,R1 SRESTORE R 

1084 011334 012637 002400 MOV (SP) + ,REGNUM sRESTORE REG NO. 

1085 011340 005037 002352 408: CLR SUBRPC CLEAR SUBR CALL PC 

1086 011344 000207 RTS PC [RETURN 

1087 

1088 

1089 

1090 

1091 

1092 LP RRAAAAAAAAAARARAAAAAAAEERAAAARARAARAAAEARARAAARAAERAAERERHAEREAEREREEERHEERRERE RS 
1093 ;* LDMSG1 = THIS SUBROUTINE LOADS THE TRANSMITTER SILO oe MSG1, AND LOADS 
1094 :* THE DATA CHARS INTO THE RCV MSG BUFFER (RCVBUF:), AS EXPECTED DATA 
1095 ze FOR LATER COMPARISON 

1096 MITIIITITITIIT ITIL TTT TILL LLL LLL ELLE ELLE LLL LEE 
1097 011346 010146 LDMSG1: MOV R1,-(SP) SAVE R1 

1098 011350 010246 MOV R2,-(SP) SAVE R2 

1099 011352 004737 010770 JSR PC,LODMSG ;LOAD MSG1 INTO TX SILO 

= 4 ARE 003220 MSG1 

1102 011362 012701 003224 MOV #MSG1+4,R1 :GET POINTER TO MSG1 

1103 011366 012702 003262 MOV #RCVBUF ,R2 2GET POINTER TO MSG BUF 

1104 011372 012122 3$: MOV (R1)+,(R2)+ ;LOAD A CHAR INTO MSG BUF 

1105 011374 020127 0035236 CMP R1,AMSG1+14. TSEE IF DID LAST DATA CHAR YET 

1106 011400 103774 BLO 3$ BR IF NOT 

1107 011402 052762 100400 177776 BIS WCRCCHK !RXBCC ,-2(R2) SET EXPECTED BCC 

1108 011410 012726 000160 MOV #160, (SP)+ LOAD HI CRC BYTE 

1109 011414 012726 000034 MOV #034, (SP)+ ZLOAD LO CRC BYTE 

1110 011420 012602 MOV (SP)+,R2 RESTORE R2 

1111 011422 012601 MOV (SP)+,R1 SRESTORE R1 

eS 011424 000207 RTS PC RETURN 

1114 

1115 

1116 

1117 


Lol 
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} .SBITL GLOBAL ERROR REPORT SECTION 
3 UU 
4 :/ THE GLOBAL ERROR REPORT SECTION CONTAINS ERROR MESSAGES 
5 i THAT ARE USED IN MORE THAN ONE TEST. 
$ SSPPIATTIITTTIITITTT ATLL AT ATA TTTATTAT LAAT TTT ATTIDAA TTT TTT 
8 
9011626 065-126-045. FTI: «= ASCIZ  /%T%062N/ 
011431 = 117, 066045 
011434 116 000 
10011436 = 4516 FMT2: .ASCIZ /RNZAFAILING REG: / 
011641 101 106 ~—-107 
011666 «1171117 
011447, 11610740 
011452 = 122s «105-10 
011455 072 040 000 
17011460 = 045-101, 105s FMT3: «= ASCIZ  /RAEXPECTED: %O3%S5RAACTUAL: %032N/ 
011463 130 4 «=6120 = 105 
011466 103 = 124 05 
011471 104 072 040 
011474 0465 117 063 
011477, 045 123065 
011502 045.—=S 101-10 
011505 103 124125 
011510 107 114 072 
011513 040 45s? 
011516 = 063 04S (tsédiG 
011521 000 
12011522 0450116045. FMT4: «= ASCIZ /2NRT2NRT2N/ 
011525 12404516 
011530 045. 124045 
011533 = 116 ~=—(000 
13011535 = 045.117 063 FMTS: = ASCIZ_ /%03%S5%03%S5%03%S5%032N/ 
011540 045 s123—S(085 
011543 045117068 
011546 045 123 065 
011551 045117068 
011554 045123065 
011557, 045. s117—«(0863 
011562 045 116 000 
14011565 = 045. 123064 FMT6: == .ASCIZ_ /%S4%03%S5%03%S5%03%S5%032N/ 
011570 065 117 063 
011573 = 045123065 
011576 = 045.117 (068 
011601 045 123 065 
011604 045 117 063 
011607 045. s*123S(065 
011612 045117068 
011615 045116000 
15011620 = 045,126 045. FMT7: = ASCIZ- /2TRO2%N/ 
011623 = 117, (O24 5 
011626 116 000 
16 011630 = 045.107 -S 105s FMTB: =. ASCIZ._ /RAEXTENDED REG AX%01%A-272N/ 
011633 = 1301241008 
011636 86116 106108 
011647 104 40—s122 


— 


BS 
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SET/ 


CLEARED/ 


SET/ 


CLEARED/ 
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CLEARED/ 
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CLEARED BY OC/ 
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012574 103 000 
40 012576 125 116 122 —M16: .ASCIZ /UNRR NOT CLEARED/ 
012601 122 040 116 
012604 117 124 040 
012607 103 114 105 
012612 101 i2e 105 
012615 104 000 
41 012617 111 122 106 E—M17: .ASCIZ /IRDY NOT SET/ 
012622 131 040 116 
012625 117 124 040 
012630 123 105 124 
012633 000 
42 012634 111 122 1046 —M18: .ASCIZ /IRDY NOT CLEARED/ 
012637 131 040 116 
012642 117 124 040 
012645 103 114 105 
012650 101 122 105 
012653 104 000 
43 012655 111 103 117 EM19: ~=.ASCIZ =/ICIR NOT SET/ 
012660 122 040 116 
012663 117 124 040 
012666 123 105 124 
012671 000 
44 012672 111 103 117 EM20: .ASCIZ /ICIR NOT CLEARED/ 
012675 122 040 116 
012700 117 124 040 
012703 103 114 105 
012706 101 122 105 
012711 104 000 
45 012713 111 101 103 EM21: .ASCIZ /IACT NOT SET/ 
012716 124 040 116 
012721 117 124 040 
012724 123 105 124 
012727 000 
46 012730 111 101 103 EM22: .ASCIZ /IACT NOT CLEARED/ 
012733 124 040 116 
012736 117 124 040 
012741 103 114 105 
012744 101 122 105 
012747 104 000.—Ci«zj 
47 012751 104 123 123. EM23: .ASCIZ /DSSI NOT CLEARED/ 
012754 111 040 116 
012757 117 124 040 
012762 103 114 105 
012765 101 122 105 
012770 104 000 
48 012772 104 123 123. EM24: .ASCIZ /DSSI NOT SET/ 
012775 111 040 116 
13000 117 124 040 
013003 123 105 124 
013006 000 
49 013007 104 123 123 EM25: .ASCIZ /DSSI NOT CLEARED BY MST CLR/ 
013012 111 040 116 
013015 117 124 040 
013020 103 114 105 
013023 101 122 105 
013026 104 040 102 
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013525 122 122 105 
013530 103 124 900 
68 013533 123 127 040 EM44: 
13536 120 101 103 
013541 113 040 043 
013544 062 040 111 
013547 116 103 117 
013552 122 122 105 
013555 103 124 000 
69 013560 123 127 040 EM4S: 
013563 120 101 103 
0135 113 040 043 
013571 063 040 111 
013574 116 103 117 
013577 122 122 105 
013602 103 124 000 
70 013605 122 103 126 EM46: 
013610 040 123 111 
013613 114 117 040 
013616 116 117 124 
013621 040 103 114 
013624 105 101 122 
013627 105 104 040 
013632 102 131 040 
013635 111 103 000 
71 013640 101 123 123. EM47: 
013643 105 115 102 
013646 040 102 111 
013651 124 040 103 
013654 117 125 116 
013657 124 040 111 
013662 116 103 117 
013665 122 122 105 
013670 103 124 000 
72 013673 117 104 104 EM48: 
013676 040 126 122 
013701 103 040 120 
013704 101 122 111 
013707 124 131 040 
013712 102 111 124 
013715 040 116 117 
013720 124 040 123 
013723 105 124 000 
73 013726 117 104 104 EM49: 
013731 040 126 122 
13734 103 040 120 
013737 101 122 111 
013742 124 131 040 
013745 102 111 124 
013750 040 116 117 
013753 124 040 103 
013756 114 105 101 
013761 122 105 104 
013764 000 
74 013765 105 126 105 EMSO: 
013770 116 040 126 
013773 122 103 040 
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-ASCIZ 


-ASCIZ 


-ASCIZ 
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/SW PACK #2 INCORRECT/ 


/SW PACK #3 INCORRECT/ 


/RCV SILO NOT CLEARED BY IC/ 


/ASSEMB BIT COUNT INCORRECT/ 


/ODD VRC PARITY BIT NOT SET/ 


/ODD VRC PARITY BIT NOT CLEARED/ 


/EVEN VRC PARITY BIT NOT SET/ 
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no ie ab ase 
NO NF Sw 
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MMNOW— -=$MOAW LOO 


RS SoRS=WAR 


EMS1: 


EMS2: 


EMS3: 


EMS: 


-ASCIZ 


-ASCIZ 


ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


7EVEN VRC PARITY BIT NOT CLEARED/ 


/READY NOT SET AFTER AX REG WRITE/ 


/READY NOT SET AFTER AX REG READ/ 


/TX UNDERRUN ERROR/ 


/RTS NOT SET/ 


/RTS NOT CLEARED/ 





an 





G 8 
CZDMRB M8203 STATIC DIAG #1 MACRO V03.01 17-O0CT=79 08:49:54 PAGE 16-9 SEQ 97 
GLOBAL ERROR REPORT SECTION 


82 
83 
84 014240 111 116 102 DH1 -ASCIZ &@INBUS/OUTBUS REG & 
014263 125 123 057 
014246 117 125 124 
014251 102 125 123 
014254 040 122 105 
014257 107 040 000 
85 014262 114 111 116 DHe: eASCIZ /’LINE UNIT INBUS REGS :/ 
14265 105 040 125 
014270 116 111 124 
014273 040 113 116 
014276 102 125 123 
014301 040 122 105 
014304 107 123 040 
014307 072 900 
86 014311 122 105 107 DH3: eASCIZ /REGIO REG11 REGI2 = REG13/ 
014314 061 060 040 
014317 040 040 122 
014322 105 107 061 
014325 061 040 040 
074330 040 122 105 
014333 107 1 
014336 040 040 
014341 122 105 107 
014344 061 3 000 
87 014347 040 040 040 DHé: ASCIZ / REG14 REGIS REGI6 ~~ REG17/ 
014352 040 122 105 
014355 107 061 064 
014360 040 040 0 
014363 122 105 107 
14 061 065 
014371 040 040 122 
014374 105 107 061 
014377 066 0 040 
014402 040 122 105 
014405 107 061 067 
014410 000 
88 014411 061 065 000 DHS: eASCIZ /15/ 
89 014414 061 066 000 DHé: -ASCIZ /16/ 
90 014417 114 111 116 DH7: -ASCIZ /LINE UNIT EXTENDED REGS :/ 
014422 105 040 125 
014425 116 11 124 
014430 040 105 130 
014433 124 105 116 
014436 104 105 104 
014441 040 122 105 
014444 107 123 040 
014447 072 000 
91 014451 101 130 060 DHB8: eASCTZ =/AKO=15) AKO=-16 AX1=15) AX1=-16/ 
014454 055 061 065 
014457 040 040 101 
014462 130 060 055 
014465 061 066 040 
014470 040 101 130 
014473 061 055 061 
014476 065 040 040 





an 





H 8 
CZDMRB M8203 STATIC DIAG #1 MACRO VO3.01 17-OCT-79 08:49:54 PAGE 16-10 SEQ = s98 Cj 
GLOBAL ERROR REPORT SECTION Gl 


014501 101 10 061 


014504 055 06 066 
014507 000 

92 014510 040 040 040 DH9: eASCIZ / AX2=15  AM2=16 AM3=15) AX3=16/ 
014513 040 101 130 
014516 062 055 061 
014521 065 040 040 
014524 101 130 062 
014527 055 061 066 
014532 040 040 101 
014535 130 063 055 
014540 061 065 040 
014543 040 101 130 
014546 063 055 061 
014551 066 000 

93 

94 EVEN 

95 

96 

97 

98 

ae) 

100 014554 BGNMSG_ ERR? 
014554 ERR1:: 

101 014554 PRINTB #FMT1,4ADDRES,MPCSR 
014554 013746 002446 MOV MPCSR,-(SP) 
014560 012746 035574 MOV #ADDRES ,-( SP) 
014564 012746 011426 MOV #FMT1,-(SP) 
014570 012746 000003 MOV #3,-(SP) 
014574 010600 V SP .RO 
014576 1064414 TRAP C$PNTB 
014600 062706 000010 ADD #10,SP 

102 014604 ENDMSG 
014604 L10002: 

108 014604 104423 TRAP C$MSG 

104 

105 

106 014606 BGNMSG- ERR2 
014606 ERR2:: 

107 014606 PRINTB #FMT1,4ADDRES,MPCSR 
014506 013746 002446 MOV MPCSR,-(SP) 
014612 012746 035574 MOV MADDRES ,~( SP) 
014616 012746 011426 MOV #FMT1,-(SP) 
014622 012746 000003 MOV #3,-(SP) 
014626 010600 MOV SP RO 
014630 104414 TRAP C$PNTB 
014632 062706 000010 ADD #10,SP 

108 014636 PRINTB) #FMT2 
014636 012746 011436 MOV #FMT2,-(SP) 
014642 012746 000001 MOV #1,-(SP) 
014646 010600 MOV SP,RO 
014650 104414 TRAP CSPNTB 
014652 062706 000004 ADD #4 ,SP 

109 014656 PRINTB #FMT7,4DH1,REGNUM 
014656 013746 002400 MOV RE GNUM , ~ (SP) 


014662 012746 014240 MOV #DH1 ,-(SP) 





I 8 
CZDMRB MB203 STATIC DIAG #1 MACRO V03.01 17=0CT=79 08:49:56 PAGE 16-11 SEQ 99 
GLOBAL ERROR REPORT SECTION 
014666 012746 011620 MOV #FMT7,=(SP) 
014672 012746 000003 MOV #3,-(SP) 
014676 010600 MOV SP,RO 
014700 104414 TRAP C$PNTB 
014702 062706 000010 ADD #10,SP 
110 014706 PRINTB #FMT3,GOODAT ,BADDAT 
014706 013746 002406 MOV BADDAT,-(SP) 
014712 013746 002404 MOV GOODAT , -(SP) 
014716 012746 011460 MOV #FMT3,=(SP) 
014722 012746 MOV #3,-(SP) 
014726 0 MOV s 
30 104414 TRAP C$PNTB 
014732 062706 000010 ADD #10,SP 
111 014736 PRINTX M#FMT4,4DH2,4DH3 
014736 012746 014311 MOV #DH3,-(SP) 
014742 012746 014262 MOV #DH2 ,- (SP) 
014746 012746 011522 MOV #FMT4,-(SP) 
014752 012746 MOV #3,-(SP) 
014756 010600 MOV . 
014760 104415 TRAP CSPNTX 
014762 062706 000010 ADD #10,SP 
112 014766 PRINTX #FMTS,LUR10,LUR11,LUR12,LUR13 
014766 013746 002310 MOV LUR13,-(SP) 
014772 013746 23 MOV LUR12,-(SP) 
014776 013746 002304 MOV LUR11,=-(SP) 
015002 013746 002302 MOV LUR10,-(SP) 
1 012746 011535 MOV #FMTS,-(SP) 
015012 012746 5 MOV #5,-(SP) 
015016 0O MOV 3 
015020 104415 TRAP CSPNTX 
015022 706 000014 ADD #14,SP 
*» 113 015026 PRINTX M#FMT9, #DH4 
015026 012746 014347 MOV #DH4 ,-(SP) 
015032 012746 011664 MOV #FMT9,-(SP) 
015036 012746 000002 MOV #2,-(SP) 
015042 MOV - 
015044 104415 TRAP CSPNTX 
015046 062706 000006 ADD #6,SP 
114 015052 PRINTX #FMT6,LUR14,LUR15,LUR16,LUR17 
015052 013746 002320 MOV LUR17,-(SP) 
015056 013746 002316 MOV LUR16,-(SP) 
15 013746 002314 MOV LUR15,-(SP) 
15 013746 231 MOV LUR14,-(SP) 
015072 012746 011565 MOV #FMT6,-(SP) 
015076 012746 MOV #5,-(SP) 
015 MOV SPR 
015104 104415 TRAP CSPNTX 
015106 062706 000014 ADD #14,SP 
115 015112 ENDMSG 
015112 L10003: 
rie 015112 104423 TRAP C$MSG 
117 
118 
119 
120 
121 015114 BGNMSG ERR3 


eenamidiaietammnanl 


ete I PGs oS ere On eo RS 
CZDMRB M8203 STATIC DIAG #1 MACRO VO3.01 17-OCT-79 08:49:54 PAGE 16-12 SEQ 100 
GLOBAL ERROR REPORT SECTION 
015114 FRRS:: 
122 015114 PRINTB #FMT1,#ADDRES,MPCSR 
015114 013746 002446 MOV MPCSR,-(SP) 
015120 012746 035574 , MOV MADDRES, -(SP) 
015124 012746 011426 MOV #FMT1,-(SP) 
015130 012746 000003 MOV #3,-(SP) 
015134 010600 MOV SP RO 
015136 104414 TRAP CSPNTB 
015140 062706 000010 ADD #10,SP 
123 015144 PRINTB #FMT2 
015144 012746 011436 MOV MFMT2,-(SP) 
015150 012746 000001 MOV #1,-(SP) 
015154 010600 MOV SP RO 
015156 104414 TRAP C$PNTB 
015160 062706 000004 ADD #4 ,SP 
124 015164 PRINTB #FMT8,TMP1,TMPO 
015164 013746 002530 MOV TMPO ,-(SP) 
015170 013746 002532 : MOV TMP1,-(SP) 
015174 012746 011630 MOV #FMTB,-(SP) 
015200 012746 000003 MOV #3,-(SP) 
015204 010600 SP RO 
015206 104414 TRAP CSPNTB 
015210 062706 000010 ADD #10,SP 
125 015214 PRINTB #FMT3,GOODAT ,BADDAT 
015214 013746 002406 MOV BADDAT ,-(SP) 
015220 013746 002404 MOV GOODAT ,-(SP) 
015224 012746 011460 MOV #FMT3,-(SP) 
015230 012746 3 MOV #3,-(SP) 
015234 010600 MOV 4 
015236 104414 TRAP C$PNTB 
015240 062706 000010 ADD #10,SP 
126 015244 PRINTX #FMT4,4DH2,4DH3 
015244 012746 014311 MOV #DH3,-(SP) 
015250 012746 014262 MOV #DH2 ,- (SP) 
015254 012746 011522 MOV #FMTS,-(SP) 
015260 012746 MOV #3,-(SP) 
015264 010600 MOV - 
266 104415 TRAP CSPNTX 
015270 706 000010 ADD #10,SP 
127 015274 PRINTX #FMTS,LUR10,LUR11,LUR12,LUR13 
015274 013746 002310 MOV LUR13,-(SP) 
015300 013746 002306 MOV LUR12,-(SP) 
15 013746 002304 MOV LUR11,-(SP) 
015310 013746 02 MOV LUR10,-(SP) 
015314 012746 011535 MOV #FMTS,-(SP) 
015320 012746 5 MOV #5,-(SP) 
015324 MOV “ 
326 104415 TRAP CSPNTX 
015330 062706 000014 ADD #14,SP 
128 015334 PRINTX #FMT9,ADH4 
015334 012746 014347 MOV #DHs = (SP) 
015340 012746 011664 MOV #FMT9,~(SP) 
015344 012746 000002 MOV #2,-(SP) 
015350 010600 V SP ,RO 
015352 104415 TRAP CSPNTX 
062706 000006 ADD #6,SP 


015354 
129 015360 PRINTX #FMT6,LUR14,LUR15,LUR16,LUR17 


CZDMRB M8203 STATIC DIAG #1 
GLOBAL ERROR REPORT SECTION 


13 


-2 


0 
132 


0 
133 
0 


013746 


000014 


000014 


014510 
011664 
000002 


MACRO VO3.01 17-OCT-79 


PRINTX 


PRINTX 


PRINTX 


PRINTX 


ENDMSG 


BGNMSG 
PRINTB 


K 8 
08:49:54 PAGE 16-13 


#FMTS ,ADH7,ADHB 


#FMTS ,AX0.15,AK0.16,AK1.15,AX1.16 


#FMT9 ,ADHO 


#FMT6,AK2.15,AK2.16,AX3.15,AX3.16 


ERR4 
#FMT10, SUBRPC 


ERRG:: 


MOV 
MOV 


101 


LUR17,=(SP) 


#14,SP 


#DH8 ,- (SP) 
#DH7,-(SP) 


AX3.15,-(SP) 


SUBRPC , = (SP) 
#FMT10,-(SP) 


Ci 
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GLOBAL ERROR REPORT SECTION 


015606 012746 000002 MOV #2,-(SP) 
015612 010600 MOV SP,RO 
015614 104414 TRAP — C$PNTB 
015616 062706 000006 ADD #6,SP 

142 015622 PRINTB #FMT1,4ADDRES,MPCSR 
015622 013746 002446 MOV MPCSR,=(SP) 

012746 035574 MOV MADDRES ,- (SP) 

015632 012746 011426 MOV #FMT1,=-(SP) 
015636 012746 000003 MOV #3,-(SP) 
015642 010600 MOV SP,RO 
015644 104414 TRAP — C$PNTB 
015646 062706 000010 ADD #10,SP 

143 015652 PRINTB #FMT2 
015652 012746 011436 MOV #FMT2,-(SP) 
015656 012746 000001 MOV #1,-(SP) 
015662 010600 MOV SP,.RO 
015664 104414 TRAP _ C$PNTB 
015666 062706 000004 ADD #4,SP 

144 015672 PRINTB #FMT7,4DH1,REGNUM 
015672 013746 002400 MOV REGNUM, - (SP) 
015676 012746 014240 MOV #DH1,-(SP) 
015702 012746 011620 MOV #FMT7,-(SP) 
015706 012746 000003 MOV #3,-(SP) 
015712 MOV » 
015714 104414 TRAP _ C$PNTB 
015716 062706 000010 ADD #10,SP 

145 015722 PRINTX #FMT4,4DH2,A4DH3 
015722 012746 014311 MOV #DH3,-(SP) 
015726 012746 014262 MOV #DH2,-(SP) 
015732 012746 011522 MOV #FMT4,-(SP) 
015736 012746 3 MOV #3,-(SP) 
015742 MOV SPR 
015744 104415 TRAP  C$PNTX 
015746 062706 000010 ADD #10,SP 

146 015752 PRINTX #FMTS,LUR10,LUR11,LUR12,LUR13 
015752 013746 002310 MOV LUR13,-(SP) 
015756 013746 002306 MOV LUR12,-(SP) 
015762 013746 002 MOV LUR11,-(SP) 
015766 013746 00230 MOV LUR10,-(SP) 
015772 012746 011535 MOV #FMTS.-(SP) 
015776 012746 MOV #5,-(SP) 
016002 A 
016004 104415 TRAP  C$PNTX 
016006 062706 000014 ADD #14,SP 

147 016012 PRINTX #FMT9,ADHS 
016012 012746 014347 MOV #DH4 .- (SP) 
016016 012746 011664 MOV #FMT9,-(SP) 
016022 012746 000002 MOV #2,-(SP) 
016026 010600 MOV SP RO 
016030 104415 TRAP — CSPNTX 
016032 706 000006 ADD #6,SP 

148 016036 PRINTX #FMT6,LUR14,LUR15,LUR16,LUR17 
016036 013746 002320 MOV LUR17,=-(SP) 
016042 013746 002316 MOV LUR16,-(SP) 
016046 013746 002314 MOV LUR15.=(SP) 
016052 013746 002312 MOV LUR14.=(SP) 


016056 012746 011565 MOV #FMT6,-(SP) 





151 016166 
0 


016246 
153 016252 
016252 
016252 


——s 3 
ahw ale ales! 
NOUS 


158 
159 piece 


01 
160 o16954 


012746 
010600 
104415 
062706 


012746 


CZDMRB M8203 STATIC DIAG #1 
GLOBAL ERROR REPORT SECTION 


000005 


000014 
014451 


000014 
014510 
011664 


mM 8 
MACRO VO03.01 17-OCT=79 08:49:54 PAGE 16-15 


PRINTX 


PRINTX 


PRINTX 


PRINTX 


ENDMSG 


BGNMSG 
PRINTB 


#FMTG ,ADH7, 4DHB 


#FMTS ,AX0.15 


#FMT9 ADHD 


-AX0.16,AK1.15,AK1.16 


#FMT6,AX2.15,AX2.16,AX3.15,AX3.16 


ERRS 


#FMT1,MADDRES ,MPCSR 


10005: 


ERRS:: 


103 


#5 ,-(SP) 
S 


AX1.15,-(SP) 


Ax0.15,=-(SP) 
#FMTS,-(SP) 
#5,.-(SP 

SP RO 

CSPNTX 
#14,SP 
#FMT9,-(SP) 
#2,-(SP) 
SP.RO 

CSPNTX 
#6,SP 
AX3.16,-(SP) 
AX3.15,-(SP) 
AX2.16,-(SP) 
AX2.15,-(SP) 
#FMT6,-(SP) 
#5,.-(SP 
SP_RO 

CSPNTX 
#14,SP 

CSMSG 
MPCSR,-(SP) 
#ADDRES ,-(SP) 
#FMT1,-(SP) 
SP RO 
CSPNTB 


IN 


CZDMRB M8203 STATIC 1" #) 
GLOBAL ERROR REPORT SECTION 


161 016304 
016304 


013746 002410 
002400 
011722 
900003 


000010 
011436 
000001 


014311 


013746 


MACRO v03.01 17-OCT-79 


PRINTB 


PRINTB 


PRINTB 


PRINTB 


PRINTX 


PRINTX 


PRINTX 


PRINTX 


N 8 
08:49:54 PAGE 16-16 


#FMT11,REGNUM,LOADAT 


#FMT8,TMP1, TMPO 


#FMT3,GOODAT ,BADDAT 


#FMT4 ,ADH2 ,ADH3 


#FMTS,LUR10,LUR11,LUR12,LUR13 


HFMT9 ,ADHS 


#FMT6,L.UR14,LUR15,LUR16,LUR17 





104 C2 


LOADAT ,=<SP) 
REGNUM, = (SP) 
ppd Fae 


#14,SP 
#DH4 .-(SP) 
#FMT9, ~(SP) 
#2, -(§p) 
SP_RO 


CSPNTX 
#6,SP 


LUR17,=(SP) 


CZDMRB M8203 STATIC DIAG #1 
GLOBAL ERROR REPORT SECTION 


016554 


171 ap gee 


016760 
173 016764 
016764 
016764 


179 016766 
016766 
180 016766 
016766 


016772 
016776 


013746 


013746 
012746 
012746 


002352 
011671 
000002 
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MACRO VO3.01 17-00 T=79 08:49:54 PAGE 16-17 


PRINTX 


PRINTX 


PRINTX 


PRINTX 


ENDMSG 


BGNMSG 
PRINTB 


#FMT4,A4DH7.ADH8 


#FMTS ,AX0.15,AX0.16,AX1.15,AX1.16 


4FMT9,ADHO 


MFMT6,AX2.15,AK2.16,AK3.15,AX3.16 


ERR6 
#FMT10, SUBRPC 


L 10006: 


ERR6:: 


MOV 
MOV 


105 


LUR16,=-(SP) 





#10,SP 


AX1.16,-(SP) 
AX1.15,-(SP) 


SUBRPC , = (SP) 
#FMT10,-(SP) 
#2,-(SP) 


an 


CZDMRB M8203 STATI 
GLOBAL ERROR REPOR 


012746 
012746 
010600 
104414 
062706 


013746 


017252 


#) 
10N 


000006 
002446 
035574 
011426 
000003 
000010 
011436 
000001 
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PRINTB 


PRINTB 


PRINTB 


PRINTX 


PRINTX 


PRINTX 


PRINTX 


#FMT1,#ADDRES ,MPCSR 


#FM78,TMP1,TMPO 


#FMT4 ,ADH2,ADHS 


#FMTS,LUR10,LUR11,LUR12,LUR13 


#FMTS ,ADHS 


#FMT6,LUR14,LURI5,LUR16,LUR17 


#10,SP 
LUR13,-(SP) 


#14,SP 


MDH .- (SP) 
#FMT9,~(SP) 


#5 ,-(SP) 





> Tae) 
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CZDMRB M8203 STATIC DIAG #1 MACRO VO03.01 17-OCT=79 08:49:54 PAGE 16-19 SEQ 107 
GLOBAL ERROR REPORT SECTION 


017256 010600 MOV SP ,RO 
017260 104415 TRAP CSPNTX 
017262 062706 000014 ADD #14,SP 
188 017266 PRINTX #FMT4,4DH7,4DH8 
7266 012746 014451 MOV #DH8B, = (SP) 
017272 012746 014417 MOV #DH7,=(SP) 
017276 012746 011522 MOV MFMT4,-(SP) 
017302 012746 MOV #3,-(SP) 
10600 SP,R 
017310 104415 TRAP CSPNTX 
017312 062706 000010 ADD #10,SP 
189 017316 PRINTX #FMTS,AX0.15,AK0.16,A4K1.15,AK1.16 
017316 013746 002330 MOV AX1.16,-(SP) 
017322 013746 002326 MOV AX1.15,=-(SP) 
017326 013746 002324 MOV AX0.16,-(SP) 
017332 013746 00232 MOV Ax0.15,=-(SP) 
017336 012746 011535 MOV #FMTS,-(SP) 
017342 012746 5 MOV #5,-(SP) 
017346 00 MOV R 
017350 104415 TRAP CSPNTX 
017352 062706 000014 ADD #14,SP 
190 017356 PRINTX #FMT9,A4DH9 
017356 012746 014510 MOV M#DHI,=( SP) 
017362 012746 011664 MOV #FMT9,-(SP) 
017366 012746 000002 MOV #2,-(SP) 
017372 O MOV y 
017374 104415 TRAP CSPNTX 
017376 706 000006 ADD #6,SP 
191 017402 PRINTX #FMT6,AX2.15,AK2.16,AK3.15,AX3.16 
017402 013746 002340 MOV AX3.16,-(SP) 
017406 013746 002336 MOV AX3.15,-(SP) 
017412 013746 002334 MOV AX2.16,-(SP) 
017416 013746 233 MOV AX2.15,=-(SP) 
017422 012746 011565 MOV #FMT6,-(SP) 
017426 012746 000005 MOV #5,-(SP) 
017432 MOV SPR 
017434 104415 TRAP CSPNTX 
017436 062706 000014 ADD #14,SP 
192 017442 ENDMSG 
017442 10007: 
198 017442 104423 TRAP C$MSG 
194 
195 
196 
197 
198 017444 BGNMSG’ ERR7 
017444 ERR?:: 
199 017444 PRINTB) #FMT1,4ADDRES ,MPCSR 
017444 013746 002446 MOV MPCSR,-‘<SP) 
017450 012746 035574 MOV #ADDRES ,- (SP) 
017454 012746 011426 MOV #FMT1,-(SP) 
017460 012746 3 MOV #3,-(SP) 
017464 010600 MOV SP,RO 
017466 104414 TRAP CSPNTB 
7470 062706 000010 ADD #10,SP 


017470 
200 017474 PRINTB #FMT2 





017474 
017500 


20 


= 
oO 
= 
N 
Ww 
ad 
> 


202 017544 


0 
203 017574 


205 017 
0 


017744 
207 017750 


012746 
012746 
010600 


104414 
062706 


013746 


CZDMRB M8203 STATIC DIAG #1 
GLOBAL ERROR REPORT SECTION 


011436 
000001 


000004 
002400 
014240 
011620 
000003 


000010 
014311 


000014 
014347 


011664 
000002 


000014 
014451 
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PRINTB 


PRINTX 


PRINTX 


PRINTX 


PRINTX 


PRINTX 


PRINTX 


#FMT7,4DH1,REGNUM 


#FMTS ADH? ,ADH3 


#FMTS5,LUR10,LUR11,LUR12,LUR13 


#FMT9 ,ADHS 


#FMT6,LUR14,LUR15,.UR16,LUR17 


#FMT4,ADH7,ADH8 


#FMTS ,AX0.15,AX0.16,AX1.15,AX1. 16 


108 


#FMT2,-(SP) 
#1,=(SP) 


#10,SP 


#0H3,-(SP) 
#DH2 , = (SP) 


MDH ,- (SP) 
#FMT9, ~(SP) 
#2,-(5P) 
SP-RO 
CSPNTX 
#6,SP 


LUR17,=(SP) 


#10,SP 


zo 


017750 


209 02 


0. 
219 Bes 





013746 


CZDMRB M8203 STATIC DIAG #1 
GLOBAL ERROR REPORT SECTION 


000014 


011664 
000002 


002446 
035574 
011426 
000003 


000010 
011436 
000001 


000004 
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MACRO V03.01 17-0CT=79 08:49:54 PAGE 16-21 


PRINTX 


PRINTX 


ENDMSG 


BGNMSG 
PRINTB 


PRINTB 


PRINTB 


#FMTS ,ADHS 


#FMT6,AX2.15,AK2.16,AK3.15,AK3.16 


ERR8 
#FMT10, SUBRPC 


#FMT1 ,AADDRES ,MP<SR 


#FMT2 


L 10010: 
T 


ERR8:: 


AX1.16,-(SP) 
AX1.15,=(SP) 


#DH9, = (SP) 
#FMT9, -(SP) 


AX3.15,-(SP) 


SUBRPC , = (SP) 


MPCSR ,-(SP) 
#ADDRES . -( SP) 
#FMT1,-(SP) 
#3,-(SP) 


MFMT2,-(SP) 
#1 ,-(SP) 

SP ,RO 
CSPNTB 


_— a. eens 


CZDMRB M8203 STATIC DIAG 
GLOBAL ERROR REPORT SECT 
220 020172 
020172 013746 
020176 012746 
020202 012746 
20206 012746 
020212 0 
020214 104414 
20216 706 


222 os05e5 


223 020302 


224 osoees 


20 
225 asoeee 


ee 
= 


415 


N 
x 
g 
$ 


0 
226 asnese 


elelelejo) 


000010 
014311 


000014 


014451 
014417 
011522 
000003 


MACRO VO3.01 17-0(1=-79 


PRINTB 


PRINTB 


PRINTX 


PRINT 


PRINTX 


PRINTX 


PRINTX 


G 9 
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@FMT7,#DH1 ,REGNUM 


#FMT3,GOODAT ,BADDAT 


@FMTG ADH2,ADHS 


#FMT5,LUR10,LUR11,LUR12,LUR13 


#FMTS, ADHG 


#FMT6,(UR14,LUR15,LUR16,1 UR17 


#FMTS  #DK7,ADH8 


110 C 


RE GNUM , = (SP) 


#DH2 = (SP) 


#FMT9,-(SP) 


#DH8 ,- (SP) 
#DH7,-(SP) 
aFMTd,-(SP) 
#3,-(5P) 


. 


$e eee 

















020450 104415 
020452 062706 
227 020456 
020456 


013746 
020462 013746 
020466 013746 
020472 013746 


0506 0 
020510 104415 
020512 

228 020516 
020516 012746 
020522 012746 
020526 012746 
020532 01 
020534 104415 
36 0627 


013746 


0634 012746 
020640 012746 
010600 

104414 
062706 
013746 
012746 
012746 


CZDMRB M8203 STATIC DIAG #1 
GLOBAL ERROR REPORT SECTION 


000014 


014510 
011664 
000002 


000010 
011436 
000001 
000004 


002400 
014240 
011620 


PRINTX 


PRINTX 


PRINT 


ENDMSG 


BGNMSG 
PRINTS 


PRINTB 


PRINTR 


H 9 
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#FMTS,AX0.15,AK0.16,AK7.15,AK1.16 


a#FMTS ADHO 


MFMT6 ,AX2.15,AK2.16,4K3.15,Ax3.16 


ERR 
#FMT1 ADDRES ,MPCSR 


aFMT2 


#FMT7, #01 REGNUM 


L10011: 


ERRS:: 


117 


CSPNTX 
#10,SP 


AX1.16,=(SP) 
AX1.15,=(SP) 


S 
CSPNTB 
#10,SP 


#FMT2,-(SP) 


REGNUM , ~ (SP) 
#DH1 = (SP) 
WEMT? =(SP) 


CZDMRB M8203 STATIC DIAG #1 
GLOBAL ERROR REPORT SECTION 


241 


242 
0. 


243 


012746 
010600 
104414 
062706 


012746 


013746 
013746 


000003 


000010 
014311 


000014 


011664 
000002 


MACRO VO3.01 17-0(T=79 


PRINTX 


PRINTX 


PRINTX 


PRINT 


ENDMSG 


RB, 
08:49:54 PAGE 16-26 


#FMTS ,ADH2 ,ADHS 


#FMTS .LURTO,LURT1,LURT2,LUR13 


aFMTS ADH 


#FMT6,LUR14,LURT5,LURT6,LURI7 


L10012: : 


112 


#3,-(SP) 
SP RO 
CSPNTB 
#10,SP 


#DH3,-(SP) 


LUR12,=-(SP) 


#FMT9,-(SP) 


roe 


CZDMRB M6203 STAT 
REPORT CODING SEC 


021062 
021062 


021062 
021062 
021062 


— 
—-9O OMNAUFWNr- 


lt al ald cal allt 
An wt 


ic D 
TION 


104425 


IAG #1 


J . 
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.SBTTL REPORT CODING SECTION 


SSPAITITITITTTTTATTATTTT ATTA LATTA ALATA ADT TAAL LATTA TTT AAAS AAA 
:/ THE REPORT CODING SECTION CONTAINS THE 

;/ "PRINTS'’ CALLS THAT GENERATE STATISTICAL REPORTS 

SALILTIISIIITATTLL TATA LT TATA AT ATTA LATTA TATA ATID IATL 


BGNRPT 
L$RPT:: 


ENDRPT 


110013: 
TRAP CSRPT 


K 
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CZDMRB M8203 STATIC DIAG #1 
LOAD DEVICE PROTECTION TABLE 
, .SBTTL LOAD DEVICE PROTECTION TABLE 
3 SAIITIITASTTITATAITAT TTA TATA TATA AAA ATTA ATTA SA ALATA AD ATA AAAS 
4 3/7 THIS TABLE IDENTIFIES THE LOAD DEVICE TO THE SUPERVISOR, SO THAT IT CAN BE 
5 37 PROTECTED FROM TESTING, IF DESIRED. 
$ EU 
8 021064 BGNPROT 
021064 L$PROT:: 
9 021064 177777 -WORD <1 ;DON'T CHK CSR ADRS 
10 021066 177777 . WORD -1 ;DON'T CHK MASSBUS UNIT NO. 
11 021070 177777 -WORD <1 ;DON'T CHK DRIVE NO. 
1 021072 ENDPROT 
14 
15 
16 
17 


ce a a cd ed ee eed ed 
WOBNAUSWN—OO DNOULSWN- 

Oo 

—M 

= 

oO 

N 

as) 


3 


nm 
ars 
VERRESRVAD 


MMM 
WE WI 
Anes 


021216 
33 
34 021220 


38 021232 
39 


44 021254 


012737 
012700 
104447 
103415 
012700 
104447 
103411 
012700 
104447 
103411 
012700 
104447 
103504 
000414 


005037 
005037 
012737 


005237 
012737 


CZDMRB M8203 STATIC DIAG #1 
INITIALIZE SECTION 


000037 


000035 


000036 


002444 
002434 
177777 
002444 
000001 


. % 
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002414 
002416 


000004 
000006 
002412 


002344 
0024 36 


« SBTTL 


INITIALIZE SECTION 





BEAU 
3/ THE INITIALIZE SECTION CONTAINS THE CODING THAT IS PERFORMED 

:/ AT THE BEGINNI UNIT. 
SAVIIITITITTIIIATITTTITAAT AST TAITT ATA T AAT 


6$: 


9$: 
sSEE IF 


s328 IF 


sSEE IF 


SEE IF 


STARST: 


CLR 
: CLEAR eevice MAP 
CLR DE 


NEWST 


NG OF THE 


MARK 
PROGRAM JUST STARTED, BR IF YES 


STARST 


TEST SEQUENCE ON THE NEXT 


LSINIT:: 


3 SAVE gr gn STACK POINTER 
;CLEAR SUBR CALL PC 

CLEAR CURRENT. STATE OF DISSI 
;CLEAR USYRT CHIP TYPE INDICATOR 


ZCLEAR ERROR FLAG 
;CLEAR CHAR LENGTH FROM SETUP 
= P A es TIME THROUGH AFTER LOAD 


é IF NO 
;SAVE ERROR TRAP VECTOR 


;RESTORE ERROR TRAP VECTOR 


K FLAG FOR NEXT TIME THROUGH 


MOV MEF START ,RO 
TRAP CSREFG 
BCS STARST 


PROGRAM JUST RESTARTED, BR IF YES 


STARST 


MOV #EF .RESTART ,RO 
TRAP CSREFG 


BCS STARST 


MOV #EF .NEW,RO 
TRAP CSREFG 


BGNINIT 

MOV SP ,PSTACK 
CLR SUBRPC 
CLR DISILO 
CLR CHPTYP 
CLR ERROR1 
CLR SAVLEN 
TST FRSTIM 
BNE $ 

MOV a4 , SAVES 
= a6, SAVE6 
MOV SAVE4 ,a44 
MOV SAVE6, a46 
MOV #1,FRSTIM 
READEF #EF.START 
BCOMPLETE 

READEF #EF.RESTART 
BCOMPLETE 

THIS IS A NEW PASS, BR iF YES 
READEF #EF .NEW 
BCOMPLETE 


NEWST 


BCS NEWST 


PROGRAM WAS JUST CONTINUED 


READEF #EF.CONT INUE 


BCOMPLETE ENDIT 
BR GE TPRM 
STARES 
V #~1 ,LOGDEV 
INC STAR 
MOV #B1T0,DEVPTR 


MOV #EF .CONTINUE ,RO 
TRAP CSREFG 


BCS ENDIT 


CLEAR FLAG TO SHOW JUST HAD STA OR RES 


RESET ‘erg attsa t TO -1 
NCR NO. OF PASSES SINCE STA OR RES 
SINIT DEVICE MAP BIT POINTER 


40 








CZ 

INITIALIZE SECTION 
45 
4 


74 021440 
021440 
. 021440 





062 
011137 


104411 


DMRB M8203 STATIC DIAG #1 


002012 


002434 


002452 


002454 
002456 


002462 


M9 | 
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1 


; GET UNIBUS ADDRESS, VECTOR, PRIORITY LEVEL, SWITCH PACKS, 


TEST 


—_ INFORMATION FOR THIS LOGICAL DEVICE 
"INC LOGDEV ; INCREMENT LOGICAL DEVICE NUMBER 
CMP LOGDEV.LSUNIT  :SEE IF MAXIMUM UNIT NO. EXCEEDED 
BGE NEWST :BR_IF YES 


10$: 


ENDIT: 


GPHARD LOGDEV,R1 7GET P=TABLE POINTER INTO R1 


MOV LOGDE V ,RO 
$SGPHRD 


TRAP C 
MOV RO,R1 
BCOMPLETE 10$ BR IF DEVICE AVAILABLE ace 108 
ASL DEVPTR SHIFT DEVICE POINTER 
BR GE TPRM :SKIP_THIS DEVICE 
BIS DEVPTR,DEVMAP ;SET BIT FOR THIS DEVICE 
ASL DEVPTR ; SHIFT BIT POINTER 
ADD #2,R1 ; INCREMENT R1 PAST MICROPROCESSOR TYPE 
MOV (R1) ,MPCSR STORE POINTER TO MICROPROCESSOR CSR'S 
MOV (R1) ,BSEL1 
INC BSEL1 ;GET POINTER TO BSEL1 (MAINTENANCE REGISTER) 
MOV BSEL1,BSEL2 
INC BSEL2 GET POINTER TO BSEL2 
MOV (R1) ,SELS 
ADD M4, SEL4 :GET POINTER TO SEL4 
MOV (R1)+,SEL6 
ADD .SEL6 : STORE POINTER TO SEL6 
MOV (R1) ,MPIVEC :GET MICROPROCESSOR INPUT INTRPT VECTOR 
MOV (R1) + ,MPOVEC 
ADD #4 ,MPOVEC GET MICROPROCESSOR OUTPUT INTRPT VECTOR 
MOV (R1)+,MPRIOR 7GET MICROPROCESSOR DEVICE PRIORITY 
ADD P ;POINT R1 TO SWITCH INDICATOR 
MOV (R1) ,RUNINH GET STATE OF MICROPROCESSOR RUN SWITCH 
ENDINIT 


L10015: 


TRAP CSINIT 


N 9 
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AUTO DROP UNIT SECTION 


} .SBTTL AUTO DROP UNIT SECTION 
3 Me Toe toes tanaen be temas tak Mean On Cae Oe ievitr want eee 
4 :/ THE AUTO DROP CODING DETERMINES WHETHER OR NOT THE DEVICE WHOSE P-TABLE 
5 WAS JUST OBTAINED IS READY FOR TESTING, AND IT IS DROPPED IF NOT READY. 
6 A MATELELILTTILTLTLULTL TTT AVITTTATPUL OPEL TA TLTLUL TALI TITALILULAT TP AL DLLME 
? 021442 BGNAUTO 
021442 LSAUTO:: 
- Z ESTABLISH CPU PRIORITY = 7 
9 021442 SETPR] #PRIO7 
021442 012700 000340 MOV #PR 107. RO 
021446 104441 TRAP — C$SPR 
10 021450 012737 021472 000004 MOV #63084 :SET UP NON-EXISTENT MEMORY ERROR TRAP VECTOR. 
11 021456 012737 000340 000006 MOV #PRIO? ano 
12 021464 005777. 160756 TST ampcs ADDRESS SELO 
13 021470 000405 BR 9$ AKE THIS BR IF DEVICE RESPONDS 
14 :COME HERE IF DEVICE CSR IS non-£xi STENT 
15 021472 062706 000004 é$: ADD #4,SP 7 CLEAN uP THE STACK POINTER 
16 021476 DODU = LOGDEV ‘DROP THIS UNIT FROM TESTING 
021476 013700 002344 MOV LOGDEV,RO 
021502 104451 TRAP — C$DODU 
17 021504 013737 002414 000004 9$: MOV SAVES, a4 :RESTORE ERROR TRAP VECTOR 
18 021512 013737 002416 000006 MOV SAVE6, a6 
19 021520 ENDAUTO 
021520 L10016: 
a 021520 104461 TRAP —- C$AUTO 
21 
22 
23 


DMRB M820 


Z 
CLEANUP 


—" 
“O90 @GwOurwe- 


—_ — — 3 
Quo KW 


3 St 
CODING 


021522 
021522 


021522 
021522 
021522 


ATIC DIAG #1 
SECTION 


104412 


' B 10 
MACRO v03.01 17-OCT-79 08:49:54 PAGE 21 SEQ 118 


-SBTTL CLEANUP CODING SECTION 


SEU 
37 THE CLEANUP CODING SECTION CONTAINS THE CODING THAT IS PERFORMED 

:/ AT THE END OF THE TEST SEQUENCE ON A PARTICULAR UNIT. 
SALIIIISTITATITTTTLTIITTTAT TATA TAT TATA DA ATTA 


BGNCLN 
LSCLEAN:: 


ENDCLN 
110017: 
TRAP CS$CLEAN 


—o 









C 10 
E 22 


1 
2 
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} .SBTTL DROP UNIT SECTION 

3 ULE Woe ance settian fautaies to te hat tah eae 

4 THE DROP-UNIT SECTION CONTAINS THE CODING THAT CAUSES A DEVICE 

5 4 TO NO LONGER BE TESTED. 

$ OALAVATIELATALIDTL TPIT LALIT IL LAD AIL ELIDA TALLY 

8 021524 BGNDU 
021524 L$DU:: 

9 ; ISSUE UNIBUS RESET TO CLEAN UP 

10 021524 BRESET 
021524 104433 TRAP CSRESET 

11 ;PRINT ‘UNIT XX DROPPED'' 

12 021526 PRINTF #FMT27,LOGDEV 
021526 013746 002344 MOV LOGDEV,-(SP) 
021532 012746 021554 MOV #FMT27,-(SP) 
021536 012746 000002 MOV #2,-(SP) 
021542 01 MOV SP,RO 
021544 104417 TRAP CSPNTF 
021546 062706 000006 ADD #6,SP 

13 021552 ENDDU 
021552 L10020: 
021552 104453 TRAP ($DU 


021554 ety 138 cH FMT27: .ASCIZ /%NZAUNIT 2D2%A DROPPEDZN/ 
' 

111 124 040 
045 104 062 
045 101 040 
104 122 117 
120 120 105 
104 045 116 
000 


-EVEN 


An 


C7DMRB M8203 — DIAG #1 
ADD UNIT SECT 


OONAOWUEW— 


021606 
021606 
10 021606 


021606 
021606 104452 


) ¢ 
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.SBTTL ADD UNIT SECTION 


BU 
3/7 THE ADD-UNIT SECTION CONTAINS THE CODING THAT CAUSES A DEVICE 

*! be BE (A) TESTED FOR THE FIRST TIME, OR (B) RESUMED IN TESTING. 

; F.AUNIT’’ IS SET, THE UNIT WILL BE TESTED AS A NEW UNIT. 

SO ILITLILTALIILATL AIL ONL ELLE ELLA ATT Fh PYITSITITTTITTTTAAS TST ST 


BGNAU 
ENDAU 


LSAU:: 


110021: 
TRAP 


IF 


C$AU 


aon 


Hg 2 ee DIAG #1 


CZDMRB 
HARDWARE TEST 


a od wd wd 
AW FW OOO NAUVEWN- 


—> —_— 


Why o> 22> 


021670 


BIFRRAVSS 3S 


39 021672 


47 021732 


013737 


104401 


012737 
37 


013737 


002414 
002416 


000014 
003576 
003644 
002364 


002404 
003026 
002364 


E 10 
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000004 
000006 


000004 
000006 


002400 


003026 


002404 
002406 


.SBTTL HARDWARE TESTS 


SL RARER REAR AEA ERRERARRARAERERA EERE EEREREEAEREAAEKREH AERA RETAEERARHTRERH EE 


. SBTTL TEST 1 = MICROPROCESSOR CSR ADDRESSING TEST (SELO) 
** 


:* THIS TEST ADDRESSES THE FIRST MICROPROCESSOR CSR (SELO), TO MAKE SURE 

;* THAT A NON-EXISTENT MEMORY TIME-OUT TRAP DOES NOT OCCUR WHILE 

;* ATTEMPTING TO ADDRESS THE MICROPROCESSOR. 

EP Pti titi e iti ti ite tric i i rite titittt iti rir iii rir iri titi titi titi titi iis) 
BGNTST 


ESTABLISH ay PRIORITY = 7 
SETPRI #PRI97 


TIs3 


4 #PR1I07,RO 
TRAP C$SPRI 
MOV #6$ , a4 SET UP NON-EXISTENT MEMORY ERROR TRAP VECTOR 
MOV posal 
TST aMPCs ADDRESS SELO 
BR 9$ ; TAKE THIS BR IF DEVICE RESPONDS 
;COME HERE IF DEVICE CSR IS NON-EXISTENT 
6$: ADD #4, SP 2 CL 


2s EAN UP THE STACK POINTER 
;REPORT CSR ADDRESS TIME-OUT 


ERRDF 1,EM1,ERR1 
TRAP CSERDF 
«WORD 1 
«WORD M1 
«WORD ERRI 
9$: MOV SAVES , 044 sRESTORE ERROR TRAP VECTOR 
MOV SAVE6, a46 
ENDTST 
L10022: 
T CSETST 


SEAR AAA TAREE RERRAERREREREERAERERERRAEERAERERERREEERAERARHRREOREERERE RS 


- SBTTL TEST 2 = INBUS/OUTBUS REG 14 INITIALIZATION TEST 


;* MASTER CLEAR (MCLR) IS SET IN THE MICROPROCESSOR, IBUS REG 14 IS READ 
:* AND COMPARED TO 200. 


mAb eee eee RRR RRR ERR RR RRR RRR RRR RRR RR RRR RRR RRR RRR RRR ERR RRR RRR RRR RRR RE REE EE SD 


BoNTST 
Tes: 


MOV #14 ,REGNUM 
JSR PC,MSTCLR 


:SET LU REG NO. = 14 
; ISSUE MASTER CLEAR 
sREAD REG 14 


JSR PC ,READLU E EG 

CMPB REDBYT,PATM+4 ;CHK FOR INITIALIZED STATE 

BEQ 6$ BR IF YES 

CLR GOODAT SET EXPECTED vt B CONTENTS = 900 
MOVB PATM+4,GOODAT ;SET EXPECTED DAT 


MOV REDBYT.BADDAT SET ACTUAL REG CONTENTS 





an 


CZDMRB M8203 STATIC DIAG #1 


TEST 


48 021740 

49 

50 021744 
021744 


021754 


66 
67 021756 
021756 
68 021756 
69 021762 
70 021770 
71 021774 
72 021774 


2066 
87 022070 
88 022072 
89 022076 
90 022100 


004737 


104455 
000002 
012135 
014606 


104401 


004737 
012737 
012701 


003770 


002615 


F 10 
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2 = INBUS/OUTBUS REG 14 INITIALIZATION TEST 


002400 


002366 
002364 
002366 


002404 
002406 


PC ,GETREG 


;GET REGS FOR PRINTOUT 


JSR 
REPORT REG NOT CLEARED A 4 MASTER CLEAR 


6$: 
ENDTST 


Wii ASRS RRR RRR RRRR RRR RRR RR RRR RRR RRR RRR RR RRR RRR RRR RR RRR RR RRR RRR RRR RRR RRS RSE DO] 


- SBTTL 


;* READING. 
7 DATA PATTERN A = 


-@ 
. 


id « RERRERERERRERERERR REE RRR RRERERR ARERR RRR ERERE ERE RERR ERE RER ERROR RARER ERRORS 


BGNTST 


3$: 


REPORT 


6$: 


ENDTST 


ERRDF 2,EM2,ERR 


L10023: 
TRAP 


TEST 3 = INBUS/OUTBUS REG 14 READ/WRITE BIT TEST 


te WRITE, READ, AND COMPARE ALL WORDS OF DATA PATTERN A INTO REG 14, 
:* A BYTE AT A TIME. NON-R/W BITS ARE MASKED OFF TO 0 BEFORE WRITING AND 


375, 373, 367, 357, 337,277,177. 


JSR PC,MSTCLR 
MOV #14 ,REGNUM 
MOV #PATA,R1 
BGNSEG 

MOVB (R1) ,WRIBYT 
BICB R14NRW,WRIBYT 


BICB 
CMPB REDBYT .WRIBYT 
BEQ 6$ 


MOV WRIBYT , GOODAT 


JSR 
LINE UNIT REG MT SCOMPARE’ 
ERRDF 3,EM3,ERR2 


ENDSEG 

INC R1 

CMP R1,#PATB 
BLO 3$ 


TS: 3 
; ISSUE +e CLEAR 
;SET LU REG NO. = 14 
GET POINTER TO DATA PAT IN R1 


TRAP 


;GET A BYTE OF PAT A 


MASK OFF NON-REAC/WRITE i a 


‘WRITE DATA BYTE INTO REG 1 
TREAD DATA BYTE FROM REG 14 
“MASK OFF NON-READ/WRITE BITS 


; COMPARE BYTE aaten TO BYTE WRITTEN 
:BR IF BYTES MATCH 

;SET EXPECTED REG CONTENTS 

[SET ACTUAL REG CONTENTS 

[GET REGS FOR PRINTOUT 


10000$: 
TRAP 
; INCREMENT DATA PATTERN POINTER 


CSERDF 
2 


EM2 
ERR2 


CSETST 


125,252,000, 377,001,002,004,010,020,040,100, 200, 376, 


C$BSEG 


CSERDF 
3 


See IF ALL WORDS OF PATTERN A USED YET 


NOT DONE YET 


a0 


1 

101 022102 
022102 

102 022102 


022202 


WEP ee ee RR RRR RR RRRRRERARRRRR RRR RR RR RRR RRR RRR RRR RR RR RRR RRR RRR RRR RR SERRA RRR RASS SE S| 
TEST 4 = REG 14 MASTER CLEAR TEST 
ISSUE MASTER CLEAR, READ REG 14 AND COMPARE 


WES R ARERR RRRRR RASA RASRARR RARER RR RE RRR ARR RRR RRR RRR ARR RRR RRR RRR RRR RR RRR RRR RRR RRR DE 


£2 (RR RRERSSASASASRSE SESS RRR RES ERE RR RRR REE RRR SRR RRR RRR RRR RRR RRR RRR RRR RRR RRR RRR RSS SS | 


5 - REG 14 UNIBUS RESET (INIT) TEST 
ISSUE UNIBUS RESET (INIT), 


Wht eRe RRRRRRRRRRER REAR RRR RRR RAR RR RRR RRR RRR RRR RRA RRR RR RRR RRA R RRR RRR RR RRR RSE SES | 


TATIC DIAG #1 MACRO V03.0i 
/QUTBUS REG 14 READ/WRITE BIT TEST 
104401 
* SBITL 
= WRITE 377 INTO REG 14, 
3* TO 200. 
BGNTST 
737 003576 . JSR 
012737 000014 002400 MOV 
112737 000377 002366 MOVB 
004737 003722 JSR 
004737 003576 JSR 
004737 3644 JSR 
123737 002364 003026 CMPB 
001416 BEQ 
037 002404 CLR 
113737 003026 002404 MOVB 
013737 002364 002406 MOV 
004737 003770 JSR 
:REPORT REG NOT 
ERRDF 
104455 
012135 
014606 
6$: 
FNDTST 
104401 
. SBITL TEST 
3* WRITE 377 INTO REG 14, 
te TO 200. 
BGNTST 
004737 003576 JSR 
012737 000014 002400 MOV 
112737 000377 002366 MOVB 
004737 00372 JSR 
BRE SET 
104433 
142777 000200 160210 BICB 
012701 000024 MOV 
006240 es: NOP 


PC,MSTCLR 
#14 REGNUM 
#377 ,WRIBYT 
PC ,WRITLU 
PCMSTCLR 
PC-RE 


° ADLU 
REDBYT ,PATM+4 
6$ 


GOODAT 


PATM+4 , GOODAT 
REDBYT ,BADDAT 


PC,GETREG 


PC,MSTCLR 
#14 REGNUM 
#377 ,WRIBYT 
PC ,WRITLU 


#RUN, @BSEL | 
#20.,R) 


ce 


G 10 
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;PERFORM MASTER CLEAR 
;SET LU REG NO. =_14 
SET DATA BYTE = 377 
;WRITE 377 INTO REG 14 
; ISSUE ayy CLEAR 
;READ REG 1 


SBR IF REG GOT CLEARED 


SET EXPECTED DATA 
;SET ACTUAL DATA 

;GET REGS FOR PRINTOUT 
CLEARED BY MASTER CLEAR 


;PERFORM MASTER CLEAR 
;SET LU REG NO. =_14 
SET DATA BYTE = 377 


; ISSUE UNIBUS RESET (INIT) 


CLEAR RUN BIT 
INIT LOOP COUNTER 


L10024: 


TRAP CSETST 


Tees 


CHK FOR INIT* D STATE 


TRAP CSERDF 

«WORD 2 

. WORD EM2 

. WORD ERR2 
L10025: 

TRAP CSETST 


READ REG 14 AND COMPARE 


T52% 


WRITE 377 INTO REG 14 


TRAP CSRESET 


—-- 






~0 


146 022314 

147 

148 022320 
022320 
022322 
022324 
022326 

149 022330 

150 sgthe 


2330 
022330 


166 022332 
022332 
167 022332 


NNN NNNN 


ed ond eal al aa lh es lt 
BNRARAN 
oo oo 
NM 
N 
8 


181 022426 
182 022434 
183 

184 022440 


022440 
022642 


—_ 
S=88nr88S 
WWW FS" 

oO wis 
Ww nN 
N nu 


004737 


104455 
000003 


003576 


002364 
003026 


002404 
002406 


002400 


160062 


003026 


002404 
002406 


J 
;REPORT 


6$: 
ENDTST 


R1 


es 

PC ,READLU 
#TXEN,REDBYT 
ala tht 


GOODAT 
PATM+4 ,GOODAT 


Pocieictes 21 


CLEARED BY UNIBUS RESET (INIT) 


4,EM4,ERR2 


SEQ 124 

sDECR COUNTER 

O STALL 

“READ REG 14 

;CLEAR UNPREDICTABLE BIT 

;CHK FOR INIT'D STATE 

;BR IF REG GOT CLEARED 

;SET EXPECTED te. 

;SET ACTUAL DAT 

:GET REGS FOR PRINTOUT 
TRAP CSERDF 
«WORD 4 
«WORD EMG 
«WORD ERR2 

L10026 

TRAP CSETST 


WEARERS RR RRERRRRR RRR RES RRR SRR REE RRR RRR RRR RRR RRR RRR RRR RRR RE RRR RRR RRR RRR RRR RRS SED S| 


TEST 6 = LINE UNIT FALSE SELECTION TEST 


. SBTTL 


:* FIRST, A MASTER CLEAR IS PERFORMED. 


THEN, THE PROGRAM SINGLE~STEPS THE 


;* MICROPROCESSOR THROUGH AN INSTRUCTION WHICH LOADS 041 (OCT) INTO THE MAR 


* 
-'- 
@ 
:* 

*® 


SELECTION OF 
ACCESSED. 


REGISTER (OBUS* ADRS 14). 
TO BE UNAFFECTED (STILL = 0). 
THE LINE UNIT REGISTERS, 


THEN, THE LINE UNIT REGISTER 14 IS READ AND CHECKED 


THIS TEST IS INTENDED TO DETECT A FALSE 
WHEN THE LINE UNIT IS NOT BEING 


Wnt aeRRRERE RARER SARRARARERERSR RARER RRR RR RRRR RRR RRR RRR RRR RAR RRR RRR RR RRR SSSR ES 


BGNTST 


2$: 


;REPORT 


PC,MSTCLR 


wreV 1KOK. R1 


2 
#041, @BSEL4 
PC,STPCLK 


0 
PC ,READLU 
+ mil sat 


GOODAT 
PATM+4 , GOODAT 
REDBYT ,BADDAT 
PC ,GETREG 


REGISTER Mi SCOMPARE 


ERRDF 


3,EM3,ERR2 


Té6:: 


; ISSUE A MASTER CLEAR 


;SET LU REG NO. = 14 

SET DESTINATION = —— REG 14 

sSET SOURCE = BSEL4 

[SET REST OF MOVE INSTRUCTION 

:SET oy Hye DE , SUBROUTINE ARGUMENT 


:SET DATA BYTE = 041 
sEXECUTE MOVE INSTRUCTION 
INSTRUCTION GOES HERE 
READ LU REG 14 


3 CHECK +o LU REG 74 UNCHANGED 
U REG 14 UNCHANGED 


:BR_IF 
i SET EXPECTED DATA 


:SET ACTUAL DATA 
:Gt* REGS FOR PRINTOUT 


TRAP 


CSERDF 
. WORD 3 


4-7 











022444 
022446 
185 022450 
186 022450 
022450 
022450 


203 022452 

022452 
206 022452 
205 022456 
206 


022464 
207 022470 


224 022570 

225 

226 022574 
022574 
022576 
022600 
022602 

227 022604 
022604 
022606 

228 022610 


229 022614 
230 022616 








012174 
014606 


104401 


020227 


CZDMRB M8203 STATIC DIAG #1 
TEST 6 = LINE UNIT FALSE SELECTION TEST 


002400 


002400 


002400 


002406 


S$: 
ENDTST 
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~~ 


«WORD EM3 
«WORD = ERR2 


10027: 
TRAP CSETST 


SL TAA AAARAARAAARARARARARAARARRRRRRARRARRARARRARARAARAAREAEHEREEHHHKAHHERAAAAHANHE Ee 


TEST 7 = INBUS REG MASTER CLEAR TEST 
ALL READ/WRITE BITS OF REGS 10-17 ARE Then, BY LOADING A 


*SBITL 


Be Be Be Be Oe Be Be 
‘* +e +e eee DS 


BGNTST 


2s: 


3$: 


REPORT 
ER 


6$: 


FIRST, 
DIFFERENT WORD OF PATTERN G INTO EACH REG. 
A MASTER CLEAR IS ISSUED AND EACH REG IS READ AND COMPARED TO A WORD OF 

| 


PATTERN G = 
PATTERN M = 


SRR ARAAERERAEEAARAEAEREAEEREAARAEEAERERAEAEAEREAREREREEEEEHEEREE REE ERRHAREEHEERE ED 


PATTERN M, WHICH CONTAINS THE git se siamese OF THE REGS. (UNPREDICTABLE 
BITS ARE MASKED OFF TO 0 BEFORE 


E_COMPARIS 
000,000,240,120,177.000, 000. 061 
000,020,000,000,200,000,000,051 











T7:% 
PC,MSTCLR ; ISSUE MASTER CLEAR 
#10,REGNUM IN IT REG NO. TO i0 
#PATG,RI INIT DATA PATTERN POINTER 
(R1)+,WRIBYT SET DATA PATTERN BYTE TO BE WRITTEN 
PC,WRITLU SWRITE BYTE INTO REG 
REGNUM ; INCREMENT REG NO. FOR WRITING 
R1,APATH ;SEE IF ALL BYTES WRITTEN YET 
2$ ‘BR IF NOT DONE WRITING YET 
PC,MSTCLR ; ISSUE MASTER CLEAR 
#10, REGNUM ; INIT LU REG NO. TO 10 
#PATM,R2 : INIT DATA PATTERN POINTER 
#UPBITS, R1 Z INIT POINTER TO UNPREDICTABLE BITS 







PC ,READLU READ A LINE UNIT REG 

(R1)+,REDBYT MASK OUT UNPREDICTABLE BITS FOR THIS REG 
REDBYT, (R2) COMPARE MASKED DATA TO EXPECTED 

6$ ;BR IF DATA READ IS OK 






GOODAT 
(R2) ,GOODAT SET EXPECTED DATA 
REDBYT,BADDAT ;SET ACTUAL DATA 












PC ,GETREG ;GET REGS FOR PRINTOUT 
CLEARED BY MASTER CLEAR 
2. EM2 ,ERR2 
TRAP CSERDF 
-WORD 2 
-WORD EM2 
-WORD  ERR2 
TST 
TRAP CSESCAPE 
-WORD 110030-. 
REGNUM : INCREMENT REG NO. 






;INCR DATA PATTERN PUINTER 
SEE IF ALL DONE YET 






R2 
R2,APATN 











= 


1 022622 
2 ascoc’ 


095694 


23 
23 


nonenononory 
BURAK 


247 022626 
022626 
248 022626 


255 022654 
256 022656 
257 022662 
258 022670 
259 022676 

022704 


260 022 
261 022712 
262 716 


CZDMRB M8203 STATIC DIAG #1 
TEST 7 = INBUS 
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REG MASTER CLEAR TEST 


103744 


104401 


002400 
002364 
000011 
002364 
002500 
002500 


002404 
002406 


FNDTST 


3$ 


SEQ 126 


;BR IF NOT DONE YET 


L10030: 
TRAP CSETST 


WER RARRERRRARSASAARSASLSARARARARER ES RRRRRARRR ARRAS RRR RRR RRR RAR RRR RRR RRR RASS ASSAD SD OS 


TEST 8 = REGISTER 10-17 ADDRESSING TEST 


:* FIRST, A MASTER CLEAR IS ISSUED. THEN, 

>* WRITE A DIFFERENT WORD OF DATA PATTERN B INTO EACH OF REGS 10-17, 
>* AND AFTER EACH nee “tat AND cn 2 ALL REGS TO EXPECTED VALUES. 
>* UNPREDICTABLE BITS AR 


» SBTTL 


zs PATTERN B = 


E MASKED 
000,000,040,100, 


OFF TO Q WHEN READ FOR COMPARISON. 
50. 000, 000,051 


RRR AARAEAAAAAAEAEEARAKEKEAEAARAEREAAEAKAAEAAAREREERKAERAEREREERKER HARRAH EES 


BGNTST 


38: 


6$: 


9$: 


10$: 


REPORT 


JSR PC,MSTCLR 

MOV #REDDAT ,R1 

MOV #PATM,R 

MOV #8. aR 

MOVB (R2)+,(R1)+ 

DEC R3 

BNE 3$ 

CLR R1 

MOV R1,REGNUM 

ADD #10 ,REGNUM 

MOVB 

MOVB WRIBYT ,REDDAT (R1) 
BICB 

JSR PC ,WRITLU 

CLR R3 

MOV R3,RE 

ADD haley tory 

JSR 

BICB 

CMP REGNUM 4 

BNE 10 

B1CB #ORDY ,REDBYT 
BICB #ORDY ,REDDAT (R3) 
CMPB +. adeinesorie same 
BEQ 12$ 

CLR GOODAT 

MOVB REDDAT(R3) ,GOODAT ; 
MOV REDBYT ,BADDAT 
JSR PC,GETREG 

REG MISCOMPARE 

ERRDF 3,€M3,ERR2 
ESCAPE TST 


y 


T8:: 


; ISSUE MASTER CLEAR 

INIT POINTER TO EXPECTED DATA AREA 

;GET POINTER TO PATTERN M 

SET COUNTER 

;LOAD BYTE OF PATRN INTO EXPECTED DATA AREA 
;DECR COUNTER 


;BR_ IF NOT DONE LOADING YET 
INIT DATA PATTERN INDEX FOR WRITING 


;GET REG NO. FOR WRITING 


0, 
PATA(R1) ,WRIBYT :SET DATA BYTE TC BE WRITTEN 


SET EXPECTED DATA FOR READ 


UPBITS(R1) ,REDDAT(R1) ;MASK OUT UNPREDICTABLE BITS 


:WRITE DATA BYTE INTO REG 
INIT DATA PAT INDEX FOR READS 


:GET = NO. FOR READING 
AD A LINE UNIT REG 


PC READ RE 
UPBITS(RS) -REDBYT ;MASK OUT UNPREDICTABLE BITS 


i SEE if ~ a REG 11 


BR IF NO 
MASK ORDY BIT IN ACTUAL BYTE 


MASK ORDY BIT IN EXPECTED BYTE 
COMPARE BYTE READ TO EXPECTED 
IF DATA MATCHES 


; SET Por scte DATA 
:SET ACTUAL DAT 


[READ AND STORE “REGS 10-17 FOR PRINTOUT 


TRAP — 


. WORD 
«WORD £&M3 
-WORD ERR2 


TRAP CSESCAPE 


-—o- 


ewe M8203 STATIC DIAG #1 


TES 


T 8 = REGISTER 10-17 ADDRESSING TEST 


280 023040 
281 023042 
282 023046 
283 023050 
284 023052 
285 023056 

306 


004737 
012737 
012701 


103741 


104401 


000010 


000010 


002630 
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002400 


002364 
002366 


002404 
002406 


12$: 


ENDTST 


«WORD L10031-. 
: INCREMENT DATA PATTERN INDEX FOR READING 
:SEE IF ALL REGS READ YET 


; INCREMENT DATA PAT INDEX FOR WRITING 
[SEE IF ALL REGS WRITTEN YET 
:BR IF NOT 


L10031: 
TRAP CSETST 


WEAR ASARRRRASSASSASESAARRAARE RARER AR RAR SRR RRR RAR RRR R RRR RAR RR RRR RAR RRR RRR D SSDS OD! 


TEST 9 = REG 11 READ/WRITE BIT TEST 
:* WRITE, READ, AND COMPARE EACH WORD OF DATA PATTERN C INTO REG 11 : 


» SBTTL 


*% 
° 


DATA PATTERN C = 020,020,020. 


'WERASAALARASASARAASSAALASAARARASASERARRRSRRARERASASRARARRRRRRR RRR RRA RAS RAR RRS ARSED SD | 


BGNTST 


3$: 


REPORT 


6$: 


ENDTST 


JSR PC,MSTCLR 
MOV #11,RE 
MOV #PATC,R1 


MOVR (R1) ,WRIBYT 
JSR PC,WRITLU 
JSR PC,READLU ; 
BICB UPBITS+1, VREDAYT MAS 
CMPB es »WRIBYT 


MOV WRIBYT , GOODAT 
MOV REDBYT ,BADDAT 
JSR PC,GETREG 

LINE UNIT REG MISCOMPARE 
ERRDF  3,EM3,ERR2 


ENDSEG 


INC R1 


CMP R1,A4PATD 
3$ 


T9:: 
7 ISSUE MASTER CLEAR 
SET LU REG NO. 11 
:GET POINTER TO DATA PAT IN R1 


TRAP C$BSEG 
;GET A BYTE OF PAT C 
:WRITE DATA BYTE INTO REG 11 


DICTABLE BIT 
;COMPARE BYTE READ TO BYTE PRITTEN 
:BR IF BYTES MATCH 
;SET EXPECTED REG CONTENTS 
:SET ACTUAL REG CONTENTS 
:GET REGS FOR PRINTOUT 


TRAP — 


- WORD 

-WORD £&M3 

-WORD ERR2 
10000$ : 

TRAP CSESEG 


; INCREMENT DATA PATTERN POINTER 
>SEE IF ALL WORDS OF PATTERN C USED YET 
[BR IF NOT DONE YET 


L1003e2: 
TRAP CSETST 


=-7 
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TEST 9 = REG 11 READ/WRITE BIT TEST 


324 
325 
326 RRR ERERARAAERAAKKRARAARARARAAARAAAAARAARARARAEARHEERHREAREREEERERAERHREH HEHEHE HEHE 
37 SBTTL TEST 10 = REG 12 READ/WRITE BIT TEST 
339 te WRITE, READ, AND COMPARE EACH WORD OF DATA PATTERN D INTO REG 12 : 
330 ts DATA PATTERN D = 000,040,000. 
331 STARA ARERR ARERR ERERERARRERERERAERERAEREREERERARAEREREEREHERAK ARRAS E HERES 
332 023200 BGNTST 
023200 T10:: 
333 023200 004737 003576 JSR PC ,MSTCL® : ISSUE ASTER CLEAR 
334 023204 012737 000012 002400 MOV #12, REGNUM TSET LU REG NO. = 12 
335 023212 012701 002630 MOV #PATD.R1 GET POINTER TO DATA PAT IN R1 
336 023216 3$: 
337 023216 BGNSEG P 
023216 104404 TRAP — C$BSEG 
338 023220 111137 002366 MOVB _— (R11), WRIBYT :GET A BYTE OF PAT D 
339 023224 004737 003722 JSR PC ,WRITLU ‘WRITE DATA BYTE INTO REG 12 
340 023230 004737 003644 JSR PC -READLU SREAD DATA BYTE FROM REG 12 
341 023234 143737 002552 002364 BICB _— UPBITS+2,REDBYT :MASK OUT UNPREDICTABLE BITS 
342 023242 123737 002364 002366 CMPB = REDBYT,WRIBYT :COMPARE BYTE READ TO BYTE WRITTEN 
343 023250 001414 BEQ 6h ‘BR IF BYTES MATCH 
344 023252 013737 002366 002404 MOV WRIBYT,GOODAT  :SET EXPECTED REG CONTENTS 
345 023260 013737 002364 002406 MOV REDBYT.BADDAT :SET ACTUAL REG CONTENTS 
346 023266 004737 003770 JSR PC, GETREG *GET REGS FOR PRINTOUT 
347 :REPORT LINE UNIT REG MISCOMPARE 
348 023272 ERRDF  3,—M3,ERR2 
023272 194455 TRAP CSERDF 
023274 000003 .WORD 3 
023276 012174 “WORD €M3 
014606 “WORD  ERR2 
349 023302 6$: 
350 023302 ENDSEG 
023302 10000$ : 
023302 104405 TRAP — C$ESEG 
351 023304 005201 INC R1 : INCREMENT DATA PATTERN POINTER 
352 023306 020127 002633 CMP R1,A4PATE 7SEE IF ALL WORDS OF PATTERN D USED YET 
353 023312 103741 BLO 3$ [BR IF NOT DONE YET 
354 023314 ENDTST 
023314 110033: 
023314 104401 TRAP — CSETST 
355 
356 
357 
358 
359 
360 ° FEAR RARER AEE ERE RRR ER EERE AERA AAEAAARERAEEAKERERA REE ERERERRE REED 
361 » SBTTL TEST 11 - REG 13 READ/WRITE BIT TEST 
363 is WRITE, READ, AND COMPARE EACH WORD OF DATA PATTERN E INTO REG 13 : 
364 : DATA PATTERN E = 000,120,020,100,120,000. 
365 'MASRAASAASARALRASZSESESESES EES SESESRSERASAR SEER SSE RRR E RRR SERRE SER ERE REESE RRR SERRE SSR 
366 023316 BGNTST 
023316 T11:: 
367 023316 004737 00357 JSR PC.MSTCLR ; ISSUE MASTER CLEAR 
368 023322 01 3737 90001 8 002400 MOV #13, REGNUM 7SET LU REG NO. = 1 
369 023330 012701 002633 MOV #PATE.R1 “GET POINTER TO DATA PAT IN R1 


ao 
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TEST 11 = REG 13 READ/WRIT 


— BIT TEST 
370 023334 3s: 
371 023334 BGNSEG 
02 104404 TRAP C$BSEG 
372 023336 111137 002366 MOVB (R1) ,WRIBYT ;GET A BYTE OF PAT E 
373 023342 004737 003722 JSR PC ,WRITLU ‘WRITE DATA BYTE INTO REG 13 
374 023346 004737 003644 JSR PC -READLU “READ DATA BYTE FROM REG 13 
375 023352 143737 002553 002364 BICB _— UPBITS+3,REDBYT :MASK OUT UNPREDICTABLE BITS 
376 023360 123737 002364 002366 CMPB REDBYT ,WRIBYT ; COMPARE BYTE maton TO BYTE WRITTEN 
77 023 001414 BEQ 6$ ‘BR IF BYTES MA 
378 023370 013737 002366 002404 MOV WRIBYT,GOODAT  :SET EXPECTED REG. CONTENTS 
023376 013737 002364 002406 MOV REDBYT.BADDAT :SET ACTUAL REG CONTENTS 
023404 004737 003770 JSR PC,GETREG :GET REGS FOR PRINTOUT 
1 ; REPORT CINE UNIT REG MISCOMPARE 
382 023410 ERRDF  3,—M3,ERR2 
023410 104455 TRAP CSERDF 
023412 000003 .WORD 3 
023414 012174 .WORD EM3 
023416 014606 ~ WORD ERR2 
383 023420 6$: 
384 023420 ENDSEG 
20 10000$: 
023420 104405 TRAP CSESEG 
385 023422 005201 INC R1 ; INCREMENT DATA PATTERN POINTER 
386 023424 020127 002641 CMP R1,A4PATF SEE IF ALL WORDS OF PATTERN E USED YET 
387 023430 103741 BLO 3$ ‘BR IF NOT DONE YET 
388 023432 ENDTST 
023432 110034: 
023432 104401 TRAP CSETST 
389 
290 
391 
392 
393 
394 FF SAAAAARARAAAARAREREARAARAAAAERARAARAAARAERARRAAERARARARAAAEAAAAAAARARARRAERARERAETE 
oe - SBTTL TEST 12 =— REG 17 READ/WRITE BIT TEST 
397 ie WRITE, READ, AND (or EACH WORD OF DATA PATTERN F INTO REG 1717 : 
398 :* DATA PATTERN F = 050,051,050. 
399 POO eeeeeeeanesedeenenareraakedanereneaqanenenenenaaenaneeenneereneeneceseneres 
400 023434 BGNTST 
023434 , Tl2:: 
401 023434 004737 003576 JSR PC, ,MSTCLR ‘a By tg CLEAR 
402 023440 012737 000017 002400 MOV #17,REGNUM :SET LU REG NO. = 17 
403 023446 012701 002641 MOV #PATF ,R1 GET BOINTER TO DATA PAT IN R1 
404 023452 3$: 
405 023452 BGNSEG 
023452 104404 TRAP — C$BSEG 
06 023454 111137 002366 MOVB (R11) ,WRIBYT :GET A BYTE OF PAT F 
407 02 004737 003722 JSR PC WRI TLU sWRITE DATA BYTE INTO REG 17 
4 02 004737 4 JSR PC ,READLU ;READ DATA BYTE FROM REG Ne 
409 023470 143737 002557 002364 BICB _- UPBITS+7,REDBYT :MASK OUT UNPREDICTABLE BITS 
410 023476 123737 002364 002366 CMPB = REDBYT,WRIBYT :COMPARE BYTE READ TO BYTE WRITTEN 
411 023504 001414 BEQ 6$ ‘BR IF BYTES MATCH 
412 023506 013737 002366 002404 MOV WRIBYT,GOODAT SET EXPECTED REG CONTENTS 
413 023514 013737 002364 002406 MOV REDBYT.BADDAT :SET ACTUAL REG CONTENTS 
414 023522 004737 003770 JSR PC, GETREG *GET REGS FOR PRINTOUT 


415 :REPORT LINE UNIT REG MJ SCOMPARE 





4-7 
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Test oT a2 - REG 17 READ/WRITE BIT TEST 


416 023526 ERRDF 3,EM3,ERR2 
023526 104455 TRAP —s- CSERDF 
023530 000003 .WORD 3 
023532 012174 .WORD EM3 
023534 014606 “WORD  ERR2 
417 023536 6$: 
418 023536 ENDSEG 
023536 10000$: 
023536 104405 TR80 =—s CSESEG 
419 023540 005201 INC Ri : INCREMENT DATA PATTERN POINTER 
420 023542 020127 002644 CMP R1,#PATG [SEE IF ALL WORDS OF PATTERN F USED YET 
421 023546 103741 BLO 3$ ‘BR IF NOT DONE YET 
422 023550 ENDTST 
023550 L10035: 
023550 104401 TRAP CSETST 
423 
424 
425 
25$ 
428 PRR RRBSBSRASRASZAAALZASLASRSESER ESSE SERRE REE ARRAS ERA RRASESER ERR S ERASERS ERS RE RAR RRS ARRAS SC 
429 ~SBTTL TEST 13 - MAINTENANCE CLOCK BIT TEST 
431 + FIRST, A MASTER CLEAR IS ISSUED TO INIT ALL REGS. THEN, THE MICROPROCESSOR 
432 :* IS PLACED IN A LOOP ON AN INSTRUCTION, BY SETTING THE INSTRUCTION IN SEL6 
433 :* AND SETTING ROM] AND RUN IN BSEL1. THE INSTRUCTION IS ONE WHICH REPETITIVELY 
434 +* READS LINE UNIT REG 17 INTO BSEL2. THE PDP-11 CAN THEN SCAN BSEL2 TO MONITOR 
435 :* THE MAINTENANCE CLOCK BIT, MCLK. THE FOLLOWING SEQUENCE IS THEN PERFORMED 
436 :* TO MONITOR MCLK 
437 :* = THE PROGRAM REPEATEDLY CHECKS THE MCLK BIT FOR THF 1 STATE, AND IF IT IS 
438 +* NOT FOUND WITHIN SEVERAL HUNDRED MILLI-SEC (DEPENDING ON THE PROCESSOR) 
‘x * AN ERROR IS REPORTED. (THE MAINTENANCE CLOCK HAS A PERIOD OF 41.6 MICRO- 
** 
441 t* = THE PROGRAM NEXT REPEATEDLY CHECKS THE MCLK BIT FOR THE O STATE, AND IF 
442 * IT IS NOT FOUND WITHIN SEVERAL HUNDRED MILLI-SEC AN ERROR IS REPORTED. 
443 :* = THE PROGRAM NEXT REPEATEDLY CHECKS MCLK BIT FOR THE 1 By AGAIN, AND 
re 7* IF IT IS NOT FOUND WITHIN SEVERAL HUNDRED MILLI-SEC, AN ERROR IS REPORTED. 
** 
446 ‘* IF THE P=TABLE FOR THIS UNIT INDICATES THAT THE MICROPROCESSOR RUN SWITCH 
447 :* IS NOT ON, THE TEST WILL BE SKIPPED 
448 - eeeORREREESERERERERERAREEERERERREEEEEREREERREREREEEERERREREERERERETEeERERE EERE 
449 023552 BGNTST 
023552 113:: 
450 023552 004737 003576 JSR PC,MSTCLR sPERFORM MASTER CLEAR 
451 023556 012737 000015 002442 MOV #13. ,TSTNUM *SET TEST NO. 
452 023564 005737 002476 TST RUNINH [SEE IF RUN SWITCH IS SET 
453 023570 001020 BNE 1$ [BR IF YES, TO RUN TEST 
454 023572 023727 002444 000001 CMP STARES 41 sSEE IF THIS IS FIRST natt SINCE STA OR RES 
455 023600 001012 BNE 40$ ‘BR IF NOT, TO SKIP PRINTING 
456 023602 PRINTF #FMT19,TSTNUM sPRINT MSG. TO SAY TEST NOT RUN 
023602 013746 002442 MOV TSTNUM, -(SP) 
023606 012746 011761 MOV #FMT19.-(SP) 
023612 012746 000002 MOV #2,-(SP) 
023616 010600 MOV SPRO 
023620 104417 TRAP —s- CSPNTF 
023622 062706 000006 ADD #6, SP 
457 023626 000137 0246174 408: Mp Al :GO TO SKIP TEST 
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TEST 13 = MAINTENANCE CLOCK BIT TEST . 

458 023632 012737 000017 002400 1$: MOV #17 ,REGNUM ;SET REG NO. = 17 

459 023640 012701 000360 MOV #360, R1 :SET INSTRUCTION SOURCE = INBUS REG 17 

460 023644 052701 000002 BIS #2,Ri SET INSTRUCTION DESTINATION = BSEL2 

461 023650 052701 021000 BIS PAV IOX.RI ;SET REST OF MOVE INSTRUCTION 

462 023654 010137 023664 MOV R1,2$ ;SET INSTRUCTION AS SUBROUTINE ARGUMENT 

463 023660 004737 004046 JSR PC,LOOPIN ;GET MICROPROCESSOR LOOPING ON MOVE INSTRUCTION 

“a4 023664 000000 2$: «WORD 0 ; INSTRUCTION GOES HERE 

466 ‘ eee eewoeo eee eee wee eee eee wooo eee eee eee oooosooosoooooooooooooooooooa 

467 ; WAIT FOR MCLK BIT TO BE SET TO 1 

3666 005037 510 CLR REGO ; INIT PROGRAM TIMER 

470 023672 1177 156554 002364 3$: MOVB @BSEL2,REDBYT  :GET REG 17 INTO REDBYT 

471 023700 132737 000002 002364 BITB #MACLK ,REDBYT sSEE IF MCLK BIT = 1 YET 

472 023706 001031 BNE 6$ ‘BR IF MCLK = 1 

473 023710 005237 002510 INC REGO ; INCREMENT TIMER 

474 023714 001366 BNE 3$ :BR IF PROGRAM TIMER DID NOT TIME OUT YET 

475 (TIME OUT = SEVERAL A a MILLI-SEC) 

476 023716 012737 000002 002404 MOV #MCLK ,GOODAT :SET EXPECTED REG CONTENT 

477 023724 013737 002364 002406 MOV REDBYT -BADDAT ;SET ACTUAL REG CONT tNTS 

478 023732 004737 003770 JSR Pls GETREG ;GET REGS FOR PRINTOUT 

479 ;REPORT MCLK BIT STUCK AT 0 

480 023736 ERRDF 5,.EMS,ERR2 
023736 104455 TRAP CSERDF 
023740 000005 «WORD 5 
023742 012266 -WORD EMS 
023744 014606 -WORD ERR2 

481 : TYPE ‘PLEASE INSURE MICROPROCESSOR RUN SWITCH IS ON’ 

482 023746 PRINTF #FMT24 
023746 .012746 012012 MOV MFMT24 ,-(SP) 
023752 012746 000001 MOV #1,-(SP) 
023756 MOV SP,RO 
023760 104417 TRAP CSPNTF 
023762 062706 000004 ADD #4 ,SP 

iat 023766 000137 024174 JMP Al ;ESCAPE TO END OF TEST 

485 a aaa eee 

re ; WAIT FOR MCLK BIT TO BE CLEARED TO 0 

488 023772 6$: 

489 023772 005037 002510 CLR REGO ; INIT PROGRAM TIMER 

490 023776 117737 156450 002364 8$: MOVB @BSEL2,REDBYT GET REG 17 INTO REDBYT 

491 0264004 132737 000002 002364 BITB #MCLK ,REDBYT 7SEE IF MCLK BIT = O YET 

492 024012 001430 BEQ 10$ ‘BR IF MCLK = 0 

493 024014 005237 002510 INC REGO ; INCREMENT TIMER 

494 024020 001366 BNE 8$ ‘BR IF TIMER DID NOT ie OUT YET ; 

495 024022 005037 002404 CLR GOODAT ;SET EXPECTED REG CONTENTS 

496 024026 013737 002364 002406 MOV REDBYT,BADDAT ;SET ACTUAL REG CONTENTS 

497 024034 004737 003770 JSR PC,GETREG “GET REGS FOR PRINTOUT 

498 ;REPORT MCLK BIT STUCK AT 1 

499 024040 ERRDF 6,EM6,ERR2 
024040 104455 TRAP CSERDF 
024042 000006 «WORD 6 
024044 012317 -WORD EM6 
024046 014606 «WORD ERR2 

500 s TYPE PLEASE INSURE MICROPROCESSOR RUN SWITCH IS ON" 

501 024050 RINTF M#FMT24 
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MACRO 


TEST 13 = MAINTENANCE CLOCK BIT TEST 


024050 012746 012012 
Bseoes 012746 000001 
024060 010600 
024062 104417 
024064 062706 000004 
502 024070 000137 024174 
503 
504 
505 
506 
507 024074 
508 024074 005037 002510 
509 024100 117737 156346 
510 024106 132737 000002 
511 024114 001027 
512 024116 005237 002510 
513 024122 001366 
514 024124 012737 000002 
515 024132 013737 002364 
218 024140 737 003770 
518 024144 
024144 104455 
024146 
024150 012266 
024152 014606 
519 
520 024154 
024154 012746 012012 
024160 012746 000001 
024164 010600 
024166 104417 
024170 062706 000004 
521 024174 
522 024174 004737 0903576 
523 024200 
24200 
024200 104401 
524 
525 
526 
527 
528 
529 
530 


ryt ye gt ty ttt Mgt: 
BIFARKRAYS 


004737 003576 


541 024206 005037 002402 


002364 
002364 


002404 
002406 
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SEQ 132 . 
T 
MOV #EMT24, — 
MOV #1,-(SP 
MOV SP.RO 
TRAP CSPNTF 
ADD #4 ,SP 
JMP Al ;ESCAPE TO END OF TEST 
; WAIT FOR MCLK BIT TO BE SET TO 1 AGAIN 
10$: 
CLR REGO ; INIT PROGRAM TIMER 
12$: MOVB @BSEL2,REDBYT ;GET REG 17 INTO REDBYT 
BITB #MCLK ,REDBYT ;SEE IF “Te BIT = 1 YET 
BNE Al ‘BE If MCLK = 1 
INC REGO ; INCREMENT TIMER 
BNE 12$ ‘BR IF TIMER DID NOT TIME OUT YET 
MOV #MCLK ,GOODAT ;SET EXPECTED REG CONTENTS 
MOV REDBYT ,BADDAT ;SET ACTUAL REG CONTENTS 
JSR PC,GETREG GET REGS FOR PRINTOUT 
;REPORT MCLK BIT STUCK AT 0 
ERRDF 5,EMS,ERR2 
TRAP CSERDF 
. WORD 5 
-WORD EMS 
-WORD ERR2 
;TYPE "PLEASE INSURE MICROPROCESSOR RUN SWITCH IS ON’ 
PRINTF #FMT24 
MOV #FMT24,-(SP) 
MOV #1,-(SP) 
MOV SP ,RO 
TRAP CSPNTF 
ay ADD #4 ,SP 
JSR PC,MSTCLR ; ISSUE MASTER CLEAR 
ENDTS? 
L10036: 
TRAP CSETST 


DEAR EEE EERE REE EEERERERREEEREREEREEE EAE 


» SBITL TEST 14 = EXTENDED REGISTER MASTER CLEAR TEST 


fe FIRST, ALL READ/WRITE BITS OF EXTENDED RECS AXO0-AX3 ARE SET BY LOADING 
>* A DIFFERENT WORD OF PATTERN H INTO EACH REG. THEN, A MASTER CLEAR IS 
;* ISSUED AND EACH REG IS READ AND aes | TO A WORD OF PATTERN I, WHICH 
3# cog: Bay & INITIALIZED 7p Als> 9 F ALL THE EXTENDED REGS. 


ze PATT 7,017, 379, a0e- 375,377 
s* PATTERN I = 000.000, 800; 000,000, 103,000,000 
5 RRR ARERR EERE ERE ERE RERER ERE EERE RRR RRER RE RAR ERE R RRR R RETA E EERE R ER ERE 
BGNTST a 
JSR PC,MSTCLR 2 ISSUE AN INITIAL MASTER CLEAR 
CLR AXNUM s INIT AX REG BYTE NO. TO 0 
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TEST 14 = EXTENDED REGISTER MASTER CLEAR TEST 


=—mo 


$42 024212 012701 002654 MOV #PATH,R1 ZINIT DATA PATTERN POINTER 

543 024216 112137 002374 1$ MOVB = (R1) +. WAX15 :SET BITS TO LOAD INTO LO BYTE 

544 024222 112137 002376 MOVB = (R1) +. WAX16 ‘SET BITS TO LOAD INTO HI BYTE 

545 024226 006737 004264 JSR PC WRI TAX ‘WRITE EXTENDED REG 

546 024232 032737 000002 002420 BIT MWRDYTO,ERROR1 SEE IF READY FAILED TO SET 

547 024240 001413 BEQ 8$ IF JN! 

$48 024242 012737 000014 002400 MOV #14 ,REGNUM “SET LU REG NO = 14 

549 024250 004737 003770 PC, GETREG GET REGS FOR PRINTOUT 

550 : REPORT READY NOT SET AFTER AX REG WRITE 

551 024254 ERRDF 52,EM52,ERR9 
024254 104455 TRAP —- CSERDF 
024256 «WORD 52 
024260 014061 ;WORD &M52 
024262 020604 “WORD ERR9 

552 024264 ESCAPE TST 
024264 104410 TRAP — CSESCAPE 
024266 000244 WORD L10037-. 

553 024270 062737 000002 002402 8%: ADD #2, AXNUM yINCR REG BYTE NO 

554 024276 020127 002664 CMP R1.APAT] ‘SEE IF ALL REGS WRITTEN YET 

555 024302 103745 BLO $ [BR IF NOT DONE WRITING YET 

556 024 737 003576 JSR PC ,MSTCLR TISSUE MASTER CLEAR 

557 024310 005037 002402 CLR AXNUM SINIT EXTENDED REG BYTE NO. TO 0 

558 024314 012701 00266 MOV #PATI,R1 tINIT DATA PAT POINTER FOR READS 

559 024320 737 004076 2$: JSR PC ,READAX “READ AN EXTENDED REG 

560 024324 032737 000001 002420 BIT #RRDYTO,ERROR1 :SEE IF READY FAILED TO SET 

561 024332 00141 BEQ 10$ ‘BR IF Mr 

$62 024334 012737 000014 002400 MOV #14,REGNUM 7SET LU REG NO. = 14 

563 024342 004737 003770 JSR PC, GETREG +GET REGS FOR PRINTOUT 

564 ;REPORT READY NOT SET AFTER AX REG READ 

565 024346 ERRDF 53,EM53,ERR 
024346 104455 TRAP —- CSERDF 
024350 000065 .WORD 53 
024352 014122 “wORD M53 
024354 “WORD ERR9 

566 024356 ESCAPE TST 
024356 104410 TRAP —- CSESCAPE 
024 000152 .WORD 110037-. 

7 024 023727 002402 000006 10$: CMP AXNUM , 46 iSEE IF AX3-15 

568 024370 001003 BNE 3$ IF NOT 

569 024372 142737 000372 002370 BICB  #AX315U,RAX15 :MASK OFF UNPREDICTABLE BITS 
024400 123711 002370 3$: CMPB —s RAX15,, (R17) [COMPARE LO BYTE TO EXPECTED VALUE 

571 024404 001417 BEQ 4$ ‘BR IF DATA MATCHES 

572 024406 005037 002404 CLR GOODAT 

573 024412 111137 002404 MOVB _— (R1) ,GOODAT :GET EXPECTED DATA BYTE 

574 024416 013737 002370 002406 MOV RAX1§ BADDAT :GET ACTUAL DATA BYTE 

575 024424 004737 004500 JSR PC Geta “GET REGS FOR PRINTOUT 

576 :REPORT REG NOT INITIAL T ZED BY MASTER CLEAR 

577 024430 ERRDF  2,EM2,ERR3 
024430 104455 TRAP —— CSERDF 
024432 000002 .WORD 2 
024434 012135 “WORD EM2 
024436 015114 “WORD ERR3 

578 024440 ESCAPE TST 
024440 104410 TRAP —- CSESCAPE 
024442 000070 .WORD 110037-. 

579 024444 005237 002402 4$: INC AXNUM : INCREMENT AX BYTE NO. 

580 024450 005201 INC R1 * INCREMENT PAT POINTER 





CZDMRB 


DMRB M8203 STATIC DIAG #1 


581 024452 
584 464 
585 024470 
586 024476 
587 
588 024502 
024502 
024504 
024506 
024510 
589 024512 
024512 
024514 


590 024516 
a 024522 


594 024532 
024532 
024532 


609 

610 yet a 
4534 

611 094834 


628 024642 


123711 


000002 
012135 


ooo += -=00-0-00 
NM — ~~ 3 OOM - 

—[WEOVEWWAROVIWO?NNNY 
MRWWOWAAWWNOS SININMOOW 

ANNNAN 3 |] NNN? ENRON 


8 
8 


002372 


002402 
002674 


E 11 
MACRO VO3.01 17-OCT=79 08:49:54 PAGE 24- 


TEST 14 = EXTENDED REGISTER MASTER CLEAR TEST 


13 SEQ 


; COMPARE HI BYTE TO EXPECTED VALUE 
;BR IF DATA MATCHES 


;GET EXPECTED DATA BYTE 
;GET ACTUAL DATA BYTE 
REGS FOR PRINTOUT 


LL 3GET 
INITIALIZED BY MASTER CLEAR 


TRAP 
. WORD 
. WORD 
. WORD 
TRAP 
WORD 

;INCR AX BYTE NO. 

;INCR PAT POINTER 

[SEE IF ALL REGS READ YET 

;BR IF NOT DONE READING YET 

L 10037: 

TRAP 


134 


CSERDF 
2 


EM2 
ERR3 


CSESCAPE 
L10037=. 


CSETST 


SF AERA ARAREARARAERHEREAERHAAERERERARRERARRRARRARAARARARARARRARARARAAHARAARAAAAEH AEE 


TEST 15 = EXTENDED REGISTER ADDRESSING TEST 


ISSUE A MASTER CLEAR TO PUT REGS INTO INITIALIZED STATES SHOWN IN 
THEN, WRITE A DIFFERENT WORD OF PATTERN J INTO EACH EXTENDED (AX) 


>* REG, tag AFTER EACH WRITE, READ AND COMPARE ALL EXTENDED REGS TO EXPECTED 


000,103,000,000 
004,103,001,100 


s + eRe RERRERERRRERRERERRR ERROR ERE RRERRR RARER RARER RARER RE REE ERE E EKER E ERE 


CMPB —s- RAX 16, (R11) 
BEQ 6$ 
CLR GOODAT 
MOVB (R1),GOODAT 
002406 MOV RAX16, BADDAT 
JSR PC,GETA 
:REPORT REG NOT 
ERRDF  2,EM2,ERR3 
ESCAPE TST 
6$: INC AXNUM 
INC R1 
CMP R1,APATJ 
BLO 2$ 
ENDTST 
" SBITL 
3% 
t* FIRST, 
i* PATTERN i 
+ * VALUE 
:* PATTERN I = 000,000,000,000, 
:* PATTERN J = 000,000,010,002, 
BGNTST 
JSR PC,MSTCLR 
MOV APATI,RI1 
MOV MREDDAT ,R2 
3$: MOVB (R1)+, (R2)+ 
CMP R1,#PATJ 
BLO 3$ 
CLR 
6$: MOV R1,AXNUM 
002374 MOVB — PATJ(R1) , WAX15 
002376 MOVB = PATJ+1(R1),WAX16 ; 
002500 MOVB  WAX15,,REDDAT(R1) 
002501 MOVB  WAX16, REDDAT+1(R 
JSR PC. WRI TAX 
CLR 
9$: MOV 3 AXNUM 
JSR PC -READAX 
000006 CMP AXNUM, #6 
BNE 10$ 


T158:: 
; ISSUE MASTER CLEAR 
; INIT POINTER TO PAT I 
; INIT POINTER TO EXPECTED DATA AREA 
sMOVE PAT I INTO REDDAT TABLE 


T INDEX FOR WRITING 

AX BYTE NO. FOR WRITING 

LO AX BYTE TO BE WRITTEN 

T HI AX BYTE TO BE WRITTEN 

T EXPECTED LO BYTE IN TABLE 
;SET EXP ECTED HI BYTE IN TABLE 

] TE DATA BYTES INTO EXTENDED REG 
‘INIT INDEX FOR READING 

: NO. FOR READING 

SREAD 2 AX BYTES 
;SEE IF AxX3-15 
‘BR IF NOT 


7 INI 
3GET 
:SET 
v5 


ee 





635 024702 
636 
637 024706 


645 024756 
646 
647 024762 


655 025022 
025022 
025022 

56 


M8203 STATIC DIAG #1 


000372 
002370 


002404 
002500 
002370 
004500 


002402 
002372 


00002 
000010 
000002 
000010 
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T 15 = EXTENDED REGISTER ADDRESSING TES] 


002370 
002500 


002404 
002406 


002501 


002404 
002406 








BICB MAX315U,RAX15 _ ;MASK OFF UNPREDICTABLE BITS 
10$: CMPB RAX15 ,REDDAT(R3) ;COMPARE LO BYTE READ TO EXPECTED 
BEQ 12$ ;BR IF LO BYTE MATCHES EXPECTED 
CLR GOODAT 
MOVB REDDAT(R3) ,GOODAT ;GET Toa akte LO BYTE 
MOV RAX15 ,BADDAT :GET ACTUAL DAT 
JSR PC,GETALL ;GET REGS FOR PRINTOUT 
REPORT REG MISCOMPARE 
ERRDF 3,€M3,ERR3 
TRAP ees 


. WORD 
«WORD £&M3 
«WORD ERR3 
ESCAPE TST 
TRAP CSESCAPE 
«WORD 110040-. 
12$: INC AXNUM INCR AX BYTE NO 
CMPB RAX 16. REDDAT+1(R3) ; COMPARE HI NBYTE READ TO EXPECTED 
BEQ 15$ 7BR IF HI BYTE MATCHES EXPECTED 
CLR GOODAT 
MOVB REDDAT+1(R3),GOODAT ;GLT tg By HI BYTE 
MOV RAX16,BADDAT :GET ACTUAL DATA 


JSR PC, GETALL ;GET REGS FOR PRINTOUT 
;REPORT REG MISCOMPARE 
ERRDF 3,EM3,ERR3 
TRAP _ 


. WORD 
.- WORD EM3 
- WORD ERR3 
ESCAPE TST 
TRAP CSE SCAPE 
WORD L10040-. 
15$: ADD #2,R3 ;INCR INDEX FOR READS 
CMP R3,410 ;SEE IF ALL AX BYTES READ YET 
BLT 9$ ‘BR IF NOT DONE READING YET 
ADD #2,R1 ;INCR INDEX FOR WRITES 
CMP R1,410 +SEE IF ALL AX BYTES WRITTEN YET 
6$ ‘BR IF NOT DONE WRITING YET 
ENDTST 
L10040: 
TRAP CSETST 
3 SERRA RATAARAAAAEAAARARAARARAARRARARARAERARAAARARARARARARAREREEREEREREREEHR EEO D 
» SBITL TEST 16 = REGS 15,16 / AX2=15,AX2-16 READ/WRITE BIT TEST 


ie USING REGS 15,16, THE INDIRECT REGS AX2-15,AX2-16 (USYRT REGS 4,5) ARE 
:* WRITTEN AND READ USING EACH WORD OF PATTERN K. AX2-15 IS COMPARED 
:* TO THE WORD WRITTEN, AND AX2-16 IS ALWAYS COMPARED 10 103. (AX2-16 IS NOT 


:* WRITEABLE). 

ie PATTERN K = 

;* FOR REG 15: 000, 377,125,252.001,002.004.010,020.040, 100.200.000.000, 
je 200 «200 - 080 - 000 - 000 - 000. 376.373.375.567, 357, 337. 277.177. 
* 77,377,377, 377,377,377,377,377 





ce La 


CZDMRB M8203 STATIC DIAG #1 
TEST 16 = REGS 15,16 / Ak2=15,AK2=16 READ/WRITE BIT TEST 


FOR REG 16: Oe Ot 377,125,252, ORS - 000,000,000.000.000.000.000.001,002, 


675 
676 025024 
025024 
677 025024 
8 030 


694 025132 


0 
eq 025216 
025216 
707 025220 
708 025224 
709 025250 
710 025232 
025232 
' 025232 
712 


104455 


000003 
012174 
015114 


103701 


104401 


004500 


000002 
003014 
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002402 
002376 
002374 
002376 
002374 


002404 
002406 


002671 


002404 
002406 


-* 
’ 
°@ 
- 
-* 


*: AN Och tena adhe wt ew hb hh I I em SINE 
T1622 
; INIT DATA PATTERN POINTER 


BGNTST 


3$: 


;REPORT 


6$: 


REPORT 


9$: 


ENDTST 


-020,040, 


376, 378. 373,367,357,337,277,1 


JSR PC,MSTCLR 
MOV A#PATK,R1 
BGNSEG 

MOV #4 ,AXNUM 
MOVB (R1) ,WAX15 
MOVB 1(R1) ,WAX16 
BICB ANBITS+4 ,WAX15 
BICB ANBITS+5 ,WAX16 
JSR PC ,WRI TAX 
JSR PC ,READAX 
CMPB 15 ,WAX15 
BEQ 6$ 
MOV WAX15 ,GOODAT 
MOV RAX15 ,BADDAT 
JSR PC,GETALL 
REG MISCOMPARE 

ERRDF 3,EM3,ERR3 
ESCAPE SEG 

INC AXNUM 

CMPB RAX16,PATI+5 
BEQ 9$ 

CLR GOODAT 
MOVB PATI+5,GOODAT 
MOV RAX16,BADDAT 
JSR PC,GETALL 
REG MISCOMPARE 

ERRDF 3,EM3,ERR3 
ENDSEG 
ADD #2,R1 

CMP R1,APATL 

3$ 


; ISSUE MASTER CLEAR 


;SET BYTE NO. = 4 


SEQ =136 


100,200,377, $059 377.377, 377.377, 377,377, 


TRAP C$BSEG 


ZSET DATA TO WRITE INTO LO BYTE 

[SET DATA TO WRITE INTO HI BYTE 

[MASK OFF NON-READ/WRITE BITS IN LO BYTE 
MASK OFF NON-READ/WRITE BITS IN HI BYTE 
LOAD DATA INTO AX2-15,AX2-16 


;READ AX2-15 AND 


[BR IF DATA MATCHES 
;SET EXPECTED DATA 
;SET ACTUAL DATA 

[GET REGS FOR PRINTOUT 


;SET AX BYTE NO. = 5 


[COMPARE HI BYTE DATA READ 


;BR IF DATA MATCHES 
;SET EXPECTED DATA 


3SET ACTUAL DATA 
[GET REGS FOR PRINTOUT 


;INCR PATTERN POINTER 
F NOT DONE YET 


AX2-16 
COMPARE LO BYTE DATA READ 


:SEE IF ALL DATA WRITTEN YET 
:BR I 


TRAP CSERDF 

WORD 3 

. WORD EM3 

WORD ERR3 

TRAP CSE SCAPE 

.WORD 10000$-. 

TRAP CSERDF 

. WORD 3 

. WORD EM3 

. WORD ERR3 
10000$: 

TRAP CSESEG 
110041: 

TRAP CSETST 
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TEST 16 = REGS 15,16 / AX2=15,AX2=16 READ/WRITE BIT TES 


025422 190008 : 


713 

714 

715 

716 FF AAARARAAAAAARAAAARARAAREARAERRAARARAAARARRAAAARARARARARARARARHAARARARARAERAAHRARE 

age seg TEST 17 = AX0-15,AX0-16 READ/WRITE BIT TEST 

719 te IN THIS TEST, A MASTER CLEAR IS DONE, AND THEN A WRITE, READ, ye COMPARE 

720 te ARE PERFORMED IN REGS AxX0-15,AX0-16 USING EACH WORD OF PATTERN 

721 te ANY BITS IN AX0-15,AxX0-16 WHICH ARE NOT READ/WRITE ARE MASKED OFF (TO 0) 

722 7* IN THE ey VALUE BEFORE COMPARISON. 

723 . PATTERN 

724 :* FOR REG 15: 000, 377,000 

725 :* FOR REG 16: 000,377,000. 

726 TEP PRRRREOSRESRASAASARALZASZSLEASRSR ESE SARS RRR RR RRR RRR RRR RR RRR RR RRR RRR RRR RRRRR RRR RRR RRR REE SD 

727 025234 BGNTST 
025234 T17:: 

728 025234 004737 003576 JSR PC,MSTCLR ; ISSUE MASTER CLEAR 

729 025240 012701 003014 MOV #PATL,R1 s INIT DATA PATTERN POINTER 

730 025244 3$: 

731 asogee BGNSEG 
025244 104404 TRAP C$BSEG 

732 025246 012737 000000 002402 MOV #0 ,AXNUM :SET BYTE NO. = 0 

733 025254 111137 002374 MOVB (R1) ,WAX15 ;SET DATA TO WRIIE INTO LO BYTE 

734 025260 116137 000001 002376 MOVB 1(R1) ,WAX16 ;SET DATA TO WRITE INTO HI BYTE 

735 025266 143737 002561 002374 BICB ANBITS+0,WAX15 ;MASK OFF NON-READ/WRITE BITS IN LO BYTE 

736 025274 143737 002562 002376 BICB ANBITS+1,WAX16 ;MASK OFF NON-READ/WRITE BITS IN HI BYTE 

737 025302 004737 004264 JSR PC ,WRI TAX ;LOAD DATA INTO AX0-15,AX0-16 

738 025306 004737 004076 JSR PC ,READAX ;READ AX0-15 AND AX0-1 é 

739 025312 123737 002370 002374 CMPB RAX15 ,WAX15 ; COMPARE LO BYTE DATA READ 

740 025320 001416 BEQ 6$ “BR IF DATA MATCHES 

741 025322 013737 002374 002404 MOV WAX15,GOODAT sSET EXPECTED DATA 

742 025330 013737 002370 002406 MOV RAX15 ,BADDAT :SET ACTUAL DATA 

743 025336 004737 004500 JSR PC,GETALL :GET REGS FOR PRINTOUT 

744 ;REPORT REG MISCOMPARE 

745 025342 ERRDF 3,EM3,ERR3 
025342 104455 TRAP CSERDF 
025344 000003 -WORD 3 
025346 012174 -WORD EM3 
025350 015114 -WORD ERR3 

746 025352 ESCAPE SEG 
025352 104410 TRAP CSE SCAPE 
025354 000046 -WORD 10000$-. 

747 025356 005237 002402 6$: INC AXNUM :SET AX BYTE NO 

748 025362 123737 002372 002376 CMPB RAX16,WAX16 ; COMPARE HI BYTE Sara READ 

749 025370 001414 BEQ 9$ ‘BR IF DATA MATCHES 

750 025372 013737 002376 002404 MOV WAX16,GOODAT ;SET EXPECTED DATA 

751 025400 013737 002372 002406 MOV RAX16,BADDAT :SET ACTUAL DATA 

752 025406 004737 004500 JSR PC,GETALL “GET REGS FOR PRINTOUT 

753 ;REPORT REG MI SCOMPARE 

754 025412 ERRDF 3,E—EM3,ERR3 
025412 104455 TRAP CSERDF 
025414 000002 -WORD 3 
025416 012174 . WORD EMS 
025420 015114 . WORD ERR3 

755 025422 9$: 

756 025422 ENDSEG 





Ten) 


C 
T 


Z 
E 


S 


T 


025422 
757 025424 


7? 

774 025440 
025440 

775 025440 

776 025444 


777 025450 
778 025450 
450 


797 025576 

798 025604 

799 025612 

800 

801 025616 
025616 


01 
02012? 
103703 


104401 


~~ ss 1 O— 
ee ne 
WWO—P 


— 
ia) 


NF NNNNNO OS 


oO 
— 


M8203 STATIC DIAG #1 
17 = AKO=15,AK0=16 READ/WRITE BIT TE 


000002 
003022 


003576 
002704 


000002 
002374 


000001 
002563 
002564 


004076 
002370 
002374 


002370 
004500 


002402 
002372 


002376 
002372 
004500 


MACRO VO3. sf 17=0( T=79 


002402 
002376 


002374 


002404 
002406 


002376 


002404 
002406 


ENDTST 


ADD 
CMP 
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08:49:54 PAGE 24-17 SEG 138 
TRAP CSESEG 
#2,R1 ;INCR PATTERN POINTER 
R1,4PAT™M +SEE ¢ ALL DATA WRITTEN YET 
3$ [BR IF NOT DONE YET 
L10042: 
F TRAP CSeTs! 


FF RTAARARAAAAAARARAAKRARAAAAAARARAARARAARARARARARARARAARARAARAAAAARERARHARRARAAAAAADADES 


TEST 18 = AX1=15,AX1=16 READ/WRITE BIT TEST 


:* IN THIS TEST, A MASTER CLEAR IS DONE, AND THEN A WRITE, READ, AND COMPARE 
:* ARE PERFORMED IN REGS AX1-15,AX1-16 USING EACH WORD OF PATTERN K. 

:* ANY BITS IN AX1=15,AX1-16 WHICH ARE NOT READ/WRITE ARE MASKED OFF (TO 0) 
:* IN THE EXPECTED VALUE BEFORE COMPARISON. 


'WERAAAAARESARRRRAASASRRARRARERRRERRRRAR RRA R RRR RRR RRR RRR RRR RRR RRR RRR RRR RRR REESE DD) 


. SBTTL 
-* 


BGNTST 


3$: 


;REPORT 


6$: 


;REPORT 


T1832 
JSR PC,MSTCLR ; ISSUE MASTER CLEAR 
MOV #PATK,R1 : INIT DATA PATTERN POINTER 
BGNSEG 
TRAP C$BSEG 
MOV #2 ,AXNUM :SET BYTE NO. = 2 
MOVB (R1) ,WAX15 ;SET DATA TO WRITE INTO LO BYTE 
MOVB 1(R1) ,WAX16 7SET DATA TO WRITE INTO HI BYTE 
BICB ANBITS+2,WAX15 >MASK OFF NON-READ/WRITE BITS IN LO BYTE 
BICB ANBITS+3,WAX16 ;MASK OFF NON-READ/WRITE ait? IN H] BYTE 
JSR PC ,WRI TAX LOAD DATA INTO AX1=-15,AXK1-16 
JSR PC ,READAX “READ AX1-15 AND AX1-16 
CMPB RAX15, WAX15 :COMPARE LO BYTE DATA READ 
BEQ 6$ :BR IF DATA MATCHES 
MOV WAX15,GOODAT sSET EXPECTED DATA 
MOV RAX15 ,BADDAT ;SET ACTUAL DATA 
JSR PC, GETALL GET REGS FOR PRINTOUT 
REG MISCOMP 
ERRDF 5. EMS ERR3 
TRAP CSERDF 
. WORD 3 
~WORD €&M3 
-WORD ERR3 
ESCAPE SEG 
TRAP CSE SCAPE 
. WORD 10000$-. 
INC AXNUM :SET AX BYTE NO. = 3 
CMPB RAX16,WAX16 + COMPARE HI BYTE DATA READ 
BEQ 9$ :BR IF DATA MATCHES 
MOV WAX16,GOODAT #SET EXPECTED DATA 
MOV nAX16,BADDAT >SET ACTUAL DATA 
JSR PC ,GETALL GET REGS FOR PRINTOUT 
REG MISCOMPARE 
ERRDF 3,EM3,ERRS 
TQAP CSERDE 


=o 


CZDMRB M8203 STATIC DIAG #1 
TEST 18 = AX1=15,AX1=16 READ/WRITE BIT TES 


025620 000003 

025622 012174 

025624 015114 
802 025626 9$: 
803 62 


000002 
805 025634 020127 003014 
806 025640 103703 

807 025642 ENDTST 


025642 104401 


35 


* SBTTL 
7* 


— aw So os SI HS 
oONAUEWN oO 


#2,R1 
R1,MPATL 
3$ 
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«WORD 3 
WORD EM3 
WORD ERR3 
10000$: 
TRAP CSESEG 
7 INCR PATTERN POINTER 
= SEE IF ALL DATA WRITTEN YET 
‘BR IF NOT DONE YET 
L10043: 
TRAP CSETST 


WERARRAAASAASRALASASAALESAARRAARES ARR RAR RRA RARER RRRA RR RRR RRR RRR RRR RRR RRR RRR ASRS DS DD | 


TEST 19 = AX3-15,AX3=16 READ/WRITE BIT TEST 


;* IN THIS TEST A MASTER CLEAR_IS DONE AND THEN A WRITE, READ, AND COMPARE ARE 
;* PERFORMED IN REGS AX3-15, —s USING EACH WORD OF PATTERN V FOR WRITING, 
[* AND PATTERN U FOR COMPARING 


819 te ANY BITS IN AX3-15,AX3-16 WHICH ARE NOT READ/WRITE ARE MASKED OFF (TO 0) 
820 :* IN THE EXPECTED VALUE BEFORE COMPARISON. 
821 t* PATTERN V = 
822 :* FOR REG 15 : 000,333,331,323.313,233.,133.000.000,000,000, 
823 i* 000,000, 00 . 
824 i* FOR REG 16 : 000,000,000,000, 000; 000, ‘000. 901. 002,004,040, 
825 7a 100,200, 346. 345,343,307,247,1 
826 7* PATTERN U = 
827 ;* FOR REG 15 : 000,001,013,011,021,101,301,.000,000,000.000, 
828 ;* 000 ,000,000,000,000,000,000,000 
829 i* FOR REG 16 : 000,000,000,000,000,000,000, 99}. 002,004,040, 
£30 i* 100,200, 346, 345,343, 307,247,1 
831 : NE TIM ae ant ene seme eee sed ts RR NONE ene PSOE 
832 025644 BGNTST 

025644 T19:: 
833 025644 004737 003576 JSR PC,MSTCLR : ISSUE MASTER CLEAR 
834 025650 142777 000010 154572 BICB AMLULOOP,@BSEL1 ;CLEAR LULOOP 
835 025656 012702 003152 MOV #PATV,R2 ; INIT PATTERN V POINTER 
836 025662 012791 003104 MOV #PATU,R1 : INIT PATTERN U POINTER 
837 025666 3$: 
838 025666 BGNSEG 

025 104404 TRAP C$BSEG 
839 025670 012737 002402 MOV #6, AXNUM 7SET BYTE NO. = 6 
840 025676 111237 002374 MOVB (R2) ,WAX15 ‘SET DATA TO WRITE INTO LO BYTE 
841 025702 116237 002376 MOVB 1(R2) ,WAX16 sSET DATA TO WRITE INTO HI BYTE 
842 025710 004737 0042 JSR PC ,WRI TAX ;LOAD DATA INTO AX3-15,AX3-16 
843 025714 004737 004076 JSR PC ,READAX *READ AX3-15 AND AX3-16 
844 025720 132737 1 002374 BITB MTEST,WAX15 7 SEE IF AN INTERFACE IS SELECTED 
845 025726 001003 E 4$ IF YES 
846 025730 142737 000372 002370 BICB #AX315U,RAX15 “MASK OF F pia te BITS 
847 025736 142737 000040 002370 4$: BICB #C32BCC ,RAX15 :CLEAR CRC32 B 
848 025744 123711 002370 CMPB RAX15,(R1) af ARE LO Byte ata READ 
849 025750 001417 BEQ 6$ “BR IF DATA MATCHES 





CZDMRB_ M8203 STATIC _DIAG #1 
rest 19 = AX3=15,AX3=16 READ/WRITE BIT TES 


850 025752 
851 025756 
852 025762 
853 025770 
854 

855 025774 


866 
867 


888 

889 026102 
026102 

890 026102 

891 026106 


104455 
000003 
012174 


000003 
012174 


004737 
012701 


003576 
003050 
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CLR GOODAT 
MOVB _—- (R1) ,GOODAT :SET EXPECTED DATA 
002406 MOV RAX15 BADDAT SSET ACTUAL DATA 
JSR PC, GETALL “GET REGS FOR PRINTOUT 
:REPORT REG MISCOMPARE 
ERRDF 3,€M3,ERR3 
TRAP  CSERDF 
.WORD 3 
“WORD £EM3 
“WORD  ERR3 
ESCAPE SEG 
TRAP —- CSESCAPE 
.wWORD 10000$-. 
6S: INC AXNUM ;SET AX BYTE NO. = 7 
000001 CMPB —s- RAX16,,1(R1) OMPARE HI BYTE DATA READ 
BEQ 9$ “BR IF DATA MATCHES 
CLR GOODAT 
002404 MOVB  1(R1),GOODAT — :SET EXPECTED DATA 
002406 MOV RAX16.BADDAT = SET ACTUAL DAT 
JSR PC,GETALL ‘GET REGS FOR PRINTOUT 
;REPORT REG MISCOMPARE 
ERRDF  3,EM3,ERR3 
TRAP —- CSERDF 
.WORD 3 
“WORD EM3 
“WORD  ERR3 
of: 
ENDSEG 
10000$: 
TRAP — CSESEG 
ADD #2,R2 :INCR PATTERN V POINTER 
ADD #2.R1 >INCR PATTERN U POINTER 
C R1_APATY [SEE IF ALL DATA WRITTEN YET 
‘BR IF NOT DONE YET 
ENDTST 
L10044: 
TRAP = CSETST 
STRATA AERA AERREEAAEAEREERKAEREREAARAEARERAARAARAAAAAERAARAARAAARAAEARAAEAAARERE RARE ES 
" SBITL TEST 20 - REG 17 - AX2-16 READ/WRITE, MASTER CLEAR TEST 
** 
t* THIS TEST CONSISTS OF 2 SUBTESTS. IN THE FIRST SUBTEST, EACH BYTE OF PAT O 
te 1s WRITTEN INTO RES 1 17 AND AFTER EACH WRITE, AX2-16 IS READ AND COMPARED 
** 
:* PATTERN O = 000,041,004,010,020,040, 100, 101,200,201, 300,111, 301, 375 
7* PATTERN P = 000, 113. 200, O88. 020,010, re A 007,105,007,144,107.157 
‘* IN THE SECOND SUBTEST. REG 17 IS LOADED WITH 375, A MASTER CLEAR [IS ISSUED, 
:* AND AX2=16 IS COMPARED TO ITS INITIAL TED STATE (103). 
BE Tt eT TET TCC O ECG C ELLE LLL LL 
BGNTST 
T20:: 
JSR PC .MSTCLR : ISSUE MASTER CLEAR 
MOV #PATO,R1 ‘INIT PAT O POINTER 


te 


DMRB M8203 STATIC DIAG #1 


892 026112 
893 026116 
894 026124 
895 


896 

897 

898 026132 
026132 


914 026222 
915 026222 
0 
916 026224 
917 026226 
918 026230 


919 026234 
920 vated 


933 306 
934 026314 
935 


104455 
000003 


012174 
016254 


103737 


104403 


003066 
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002400 
002402 


002406 


002366 


002671 


002404 
002406 


TEST $1 30 - REG 17 = AX2=16 READ/WRITE, MASTER CLEAR TEST 


REPORT REG MI SCOMP. 
ERRDF 


6$: 
ENDSEG 


C$BSUB 


C$BSEG 


CSERDF 
3 


EM3 
ERRS 


CSESEG 


#PATP,R2 :INIT PAT P POINTER 
#17,REGNUM :SET LU REG NO. = 17 
#5, AXNUM 7SET AX BYTE NO. = 5 FOR AX2=16 
READ AND COMPARE AX2-16 
T20. 
TRAP 
TRAP 
(R1) ,WRIBYT :SET BYTE TO BE WRITTEN 
PC ,WRITLU ‘WRITE DATA BYTE INTO REG 17 
PC ;READAX TREAD AX2 
RAX16, (R2) = COMPARE AX2=16 TO EXPECTED DATA 
6$ ‘BR IF DATA MATCHES 
LOADAT 
(R1),LOADAT :SET DATA WHICH WAS WRITTEN 
GOODAT 
(R2) ,GOODAT :SET EXPECTED DATA READ 
RAX16,BADDAT = SET ACTUAL DATA READ 
PC, PCAGETALL “GET REGS FOR PRINTOUT 
3,—M3,ERRS 
TRAP 
WORD 
“WORD 
WORD 
10000$: 
TRAP 
R1 :INCR PAT O POINTER 
R2 ‘INCR PAT P POINTER 
R1,#PATP [SEE IF ALL BYTES LOADED YET 
3$ ‘BR IF NOT 
L10046: 
TRAP 
> LOAD REG 17, DO MASTER CLEAR, READ AND COMPARE AX2-16 
720.2 
TRAP 
#375 ,WRIBYT :SET DATA TO BE LOADED 
PC ,WRITLU ‘LOAD DATA INTO REG 17 
PC-MSTCLR : PERF ORM MASTER. CLEAR 
PC ;READAX TREAD AX2-15,AX2-16 
RAX16,PATI+5 SEE IF axo16- a INIT'D CORRECTLY 
6$ 7BR IF YES 
GOODAT 
PATI+5,GOODAT  ;SET EXPECTED DATA 
RAX16, BADDAT ‘SET ACTUAL DAT 


REPORT REG NOT 


PC ,GETA :GET REGS FOR PRINTOUT 
INITIALIZED BY MASTER CLEAR 


=n 
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Test 20 = REG 17 = AX2=16 READ/WRITE, MASTER CLEAR TEST 


936 026320 ERRDF  2,£M2,ERR3 
025320 104455 TRAP CSERDF 
026322 000002 .WORD 2 
026324 012135 “WORD EM2 
026326 015114 “WORD  ERR3 
937 026330 6$: 
938 026330 ENDSUB 
026330 10047: 
026330 104403 TRAP — C$ESUB 
939 026332 ENDTST 
026332 L 10045: 
026332 104401 TRAP CSETST 
940 
941 
942 
943 
944 
945 FLUE RREE RARER ERARREREEEERERAEERAEREREEEAEAERA ERR E AE Ee 
946 . SBTTL TEST 21 = ange tL BUFFER rr TEST 
947 ;* A MASTER CLEAR IS DONE FIRST, AND THEN A BYTE OF PATTERN N IS LOADED INTO 
948 >* REG 11 AND THE NEXT BYTE IS LOADED TWICE INTO REG 10. THE PROGRAM THEN WAITS 
949 :* AT LEAST 50 MICRO-SEC, AND THEN IT READS AND COMPARES AX1-15 TO THE BYTE 
950 :* WHICH WAS LOADED INTO REG 10, AND IT READS AND COMPARES AX1-16 TO THE BYTE 
951 ;* WHICH WAS LOADED INTO REG 11. THIS PROCESS IS REPEATED (JNCLUDING THE MASTER 
952 b* CLEAR) FOR EACH PAIR OF BYTES IN PATTERN N. 
953 y* PATTERN N 
954 ie FOR REG 10: 000,125,252,377,000,000,000 
955 te FOR REG 11: 000.000.000.000.005.012.017 
956 FARRAR AREA A RARER AARAERAAAEAAAERAAREAAEAEAEARAAERARRERERAERAEAETEREE EER REE ED 
957 026334 BGNTST 
026334 T21:: 
958 026334 012701 003032 MOV #PATN,R1 :INIT PATTERN POINTER 
959 026340 012737 026602 002362 MOV #A2,RETADR SET SUBROUTINE ERROR RETURN ADDRESS 
960 026346 BGNSUB wee 
026346 104402 TRAP —- C$8SUB 
961 026350 004737 003576 3$: JSR PC,MSTCLR ISSUE MASTER CLEAR 
962 026354 004737 004634 JSR PC,OSIRDY CHECK ORDY AND OCOR FOR EXPECTED STATES 
963 026 000001 1 
964 026 012737 000011 002400 MOV #11, REGNUM :SET LU REG NO. = 11 
965 026370 111137 002366 MOVB (R1) ,WRIBYT SET DATA BYTE TO BE WRITTEN 
966 026374 004737 003722 JSR PC ,WRITLU ‘WRITE BYTE INTO REG 117 
967 026400 012737 000010 002400 MOV #10,REGNUM :SET LU REG NO. = 10 
968 026406 116137 000001 002366 MOVB 1(R1),WRIBYT | :SET DATA BYTE TO BE WRITTEN 
969 026414 004737 003722 JSR PC ,wRITLU [WRITE BYTE INTO REG 10 
970 026420 004737 003722 ISR PC WRITLU ‘WRITE IT AGAIN (SO 2 ENTRIES ARE IN SILO) 
971 026424 004737 005120 JSR PC ,WAITSO sWAIT FOR SILO DATA TO RIPPL 
972 026430 004737 004634 JSR PC -OSIRDY [CHECK ORDY AND OCOR FOR EXPECTED STATES 
973 026434 000003 . 
974 026436 012737 000002 002402 MOV #2, AXNUM ;SET BYTE NO. FOR AX1-15 
975 026444 004737 004076 JSR PC -READAX TREAD AX1-15. AX1-16 
976 026450 123761 002370 000001 CMPB —s- RAK 15,1 (R11) SCOMPARE AX1-15 TO EXPECTED 
977 026456 001420 BEQ 6$ “BR IF MATCH 
978 026460 005037 002404 CLR GOODAT 
979 026464 116137 000001 002404 MOVB  1(R1),GOODAT SET EXPECTED DATA 
980 026472 013737 002370 002406 MOV ROX15°RADDAT SET ACT 


UAL DAT 
981 026500 004737 004500 JSR PC,GETALL :GET REGS FOR PRINTOUI 


= 


104455 


000003 
012174 
015114 


104410 


104455 
000003 


012174 
015114 


104410 
000014 
062701 
020127 
103663 


104403 


104401 


M8203 STATIC DIAG #1 
ST 21 = TRANSMITTER BUFFER DATA TEST 


002402 
002372 


002404 
002404 
002372 
004500 


000002 
003050 
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002406 


iR 


6$: 


iR 


EPORT aie “gow 
3, EMS ERR3 

TRAP CSERDF 
«WORD 3 
«WORD EM3 
-WORD ERR3 

ESCAPE SUB 
TRAP CSESCAPE 
«WORD 1L10051-. 

INC AXNUM ;INCR AX BYTE NO 

CMPB RAX16,(R1) : COMPARE | AX1-16 TO EXPECTED 

BEQ 9$ BR IF MATCH 

CLR GOODAT 


MOVB (R1) ,GOODAT 

MOV RAX16 ,BADDAT 

JSR PC,GETALL 
EPORT REG MISCOMPARE 

ERRDF 3,EM3,ERR3 


SET EXPECTED _ 
;SET ACTUAL DAT 
ZGET REGS FOR PRINTOUT 


TRAP 5 SERDF 


. WORD 
.- WORD EM3 
. WORD ERR3 
ESCAPE SUB 
oT TRAP CSESCAPE 
. WORD L710051-. 
9$: ADD #2,R1 ; INCR DATA PATTERN POINTER 
CMP R1,A4PATO see IF ALL DATA BYTES WRITTEN YET 
as BLO 3$ BR IF NOT DONE YET 
ENDSUB 
L10051: 
TRAP C$ESUB 
ENDTST 
L10050: 
TRAP CSETST 


CLEARER ERE EERE EERE KEKE EREREEERE EEE 


. SBTTL 


-* 


. 
. 
e 
. 


-* 
-* 
-* 
** 
-* 
-* 
3* 
ot 
-* 
:* 
°@ 
3* 


TEST 22 = TRANSMITTER BUFFER SEQUENCING TEST 


FIRST, A MASTER CLEAR IS DONE, AND THE PROGRAM CHECKS FOR ORDY=1, OCOR=0. 
THEN, 2 TSOM CHARS ARE LOADED INTO THE TX SILO, AND ALLOWED TO RIPPLE 
DOWN ¥ THE OUTPUT. THE FOR ORDY=1, ain tneae ten 


PROGRAM CHECKS OCOR=1. 
NEXT, THE PROGRAM CYCLES THE STEPLU BIT UNTIL OcoR=0 AGAIN, 
THIS TO OCCUR WITHIN 3 CYCLES. 
He: SILO IS THEN FILLED WITH 64 BYTES OF A 256-BYTE BINARY COUNT PATTERN 
(000-377) AND THE PROGRAM CHECKS FOR ORDY=0 AFTER THE 64TH CHAR IS LOADED. 
THE PROGRAM CYCLES STEPLU FOR 8 CYCLES AND CHECKS THAT AFTER THE 8TH, ORDY=1. 
AX1-15 IS READ AND COMPARED TO EXPECTED DATA. 
THE REST OF THE — COUNT DATA BYTES ARE LOADED, CYCLED 8 CLOCKS, READ AND 
eae tate ‘. ht TIME. UPON COMPLETION, THE SILO IS CHECKED TO BE EMPTY 


RARER ARARARAAARARARAERARARERERARARRARHRARHRARERERARERHRKRERKRERE REAR eeheneeeeee 


BoNTST 


—o 
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Test eT 82 = TRANSMITTER BUFFER SEQUENCING T 


012737 027262 


1026 

1027 026614 003576 
1028 026620 004634 
1029 026624 00000 


1030 
1031 
1032 
1033 026626 
1034 026634 


002400 


002364 


026774 
026774 


012737 
005001 
1076 027016 004737 
1077 027022 000001 
1078 027024 004737 


PC.MSTCLR 
PC,OSIRDY 


#TXSOM, TXWORD 
PC,LDTXS] 
PC ,LDTXSI 
PC ,WAITSO 
PC,OSIRDY 


PC,STPLU 

PC ,READLU 
MOCOR ,REDBYT 
6$ 

R1 

R1,43 

3$ 

PC,OSIRDY 


et AECaM 
PC,STPLU 
PC ,READLU 


; ISSUE MASTER CLEAR 
;CHK ORDY=1, OCOR=0 


:SET DATA TO yi INTO SILO 
LOAD THE SILO WITH SOM 


{LOAD ANOTHER 


SOM 
sWAIT FOR DATA TO RIPPLE 
CHK ORDY=1, OCOR=1 


INIT CYCLE COUNTER TO 0 
7SET REG NO. = 17 

7STEP LU 1 CYCLE 

;READ REG 17 

SEE IF OCOR = 0 YET 

BR IF OCOR = 0 

;INCR CYCLE COUNT 

: SEE a 3 CYCLES DONE YET 


‘BR I NO 
;CHK ORDY=1, OCOR=0 


INIT PATTERN FOR WRITING 


SET DATA TO BE po ay 

;LOAD DATA CHAR INTO TX SILO 
[WAIT FOR DATA TO RIPPLE IN SILO 
SEE IF 64TH CHAR JUST LOADED 


‘BR IF NO 
;SET UP TO CHK GRDY=0,0COR=1 


;SET UP TO CHK ORDY=1,0COR=1 
;CHK ORDY, OCOR 


:INCR PATTERN FOR WRITES 
SEE IF 64 CHARS LOADED YET 
;BR IF NO 


SET REG NO. 
INIT CYCLE COUNT 
SCLOCK LU FOR 1 CYCLE 


;READ REG 11 





=o 
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TEST eT 32 = TRANSMITTER BUFFER SEQUENCING TES 


1079 027030 132737 000020 002364 BITB #ORDY,REDBYT  ;SEE IF ORDY = 1 YET 

1080 027036 001004 BNE 19$ ‘BR IF YES 

1081 027040 005201 INC R1 sINCR CYCLE COUNT 

1082 027042 (20127 000010 CMP R1,48. [SEE IF 8 CYCLES YET 

1083 027046 002763 BLT 16$ ‘BR IF NOT YET 
027050 004737 004634 19$: JSR PC,OSIRDY “CHK ORDY = 1, OCOR = 1 

1985 027054 000003 3 

4 ; READ AND COMPARE FIRST CHARACTER IN AX1=-15 

1089 027056 005004 CLR RSG Zs INIT PATTERN FOR READING 

1090 027060 012737 000002 002402 MOV #2, AXNUM SSET AX BYTE NO. FOR AX1-15 

1091 027066 004737 004076 JSR PC .READAX TREAD AX1=-15 

1092 027072 123704 002370 CMPB —s- RAX15, RG ; COMPARE AX1=15 TO EXPECTED 

1093 027076 001415 BEQ 20$ [BR IF MATCH 

1094 027100 010437 002404 MOV R4, GOODAT sSET EXPECTED DATA 

1095 027104 013737 002370 002406 MOV RAX15,BADDAT §: SET ACTUAL DATA 

1096 027112 004737 004500 JSR PC,GETALL ‘GET REGS FOR PRINTOUT 

1097 ; REPORT REG MISCOMPARE 

1098 027116 ERRDF 3,£M3,ERR3 
027116 104455 TRAP —- CSERDF 
027120 000003 .WORD 3 
027122 012174 ~WORD EM3 
027124 015114 .~WORD ERR3 

1099 027126 ESCAPe TST 
027126 104410 TRAP —- CSESCAPE 
027130 000132 .WORD 110052=. 

1100 027132 208: 

1108 LOAD AND COMPARE REST OF CHARS, MONITOR ORDY, OCOR 

| 88S 9898888888 OS8OOS88OO8S OOS OSOOCOCCOSOOOS COSCO 

1104 027132 020327 000377 248: CMP R3,4255. SEE IF ALL CHARS LOADED YET 

1105 027136 003010 BGT 26$ ‘BR IF YES 

1106 027140 010337 002422 MOV R3,TXWORD 3s SET DATA TO BE WRITTEN 

1107 027144 004737 005146 JSR PC,LDTXSI ;LOAD DATA CHAR INTO TX SILO 

1108 027150 005203 INC R3 * INCR DATA TO BE WRITTEN 

1109 027152 004737 004634 JSR PC,OSIRDY :CHK ORDY=0, OCOR=1 

1110 027156 00000 2 

1111 027160 005204 26$: INC RS : INCR PAT FOR READING 

1112 027162 004737 005226 JSR PC,STPLU ;CLOCK LINE UNIT FOR 8 CYCLES 

1113 027166 000010 8. 

1114 027170 004737 004076 JSR PC ,READAX :READ AX1-15 

1115 027174 123704 002370 CMPB RAX15,R4 DS a AX1-15 TO EXPECTED 

1116 027200 001415 BEQ 27$ ‘BR IF MATCH 

1117 027202 010437 002404 MOV R4, GOODAT 'SET EXPECTED DATA 

1118 027206 013737 002370 002406 MOV RAX15,BADDAT | :SET ACTUAL DATA 

1119 027214 004737 004500 JSR PC, GETALL :GET REGS FOR PRINTOUT 

1120 ;REPORT REG MISCOMPARE 

1121 027220 ERRDF  3,€M3,ERR3 
027220 104455 TRAP — CSERDF 
027222 000003 .WORD 3 
027224 012174 “WORD EM3 
027226 015114 WORD  ERR3 

1122 027230 ESCAPE TST 
027230 104410 TRAP —- CSESCAPE 
027232 000030 .WORD 110052-. 

1123 027234 020427 000377 27%: CMP R4,4255. SEE IF WE READ LAST CHAR YET 
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TEST 22 = TRANSMITTER BUFFER SEQUENCING TEST 


1124 027240 001004 BNE 29S ;BR :F NOT 
1125 027242 004737 004634 JSR PC,OSIRDY ;CHK ORDY=1, OCOR=0 
1126 027246 000001 1 
1127 027250 000404 BR A3 
1128 027252 004737 004634 298: JSR PC,OSIRDY ;CHK ORDY=1, OCOR=1 
1129 027256 000003 3 
1130 027260 000724 BR 245 ; CONT INUE 
1131 027262 A3: 
1132 027262 ENDTST 

027262 110052: 

027262 104401 TRAP CSETST 
1133 
1134 
1135 
1137 
1138 SLR RR RR RR TTT TOTTORI RTO TTT TORT TR TTR ERR EERE RRR hth t 
a . SBTTL TEST 23 - TX MSG TIMING TEST, CHAR MODE, WITH CRC 

*& 

1141 :* IN THIS TEST, AN ENTIRE MESSAGE IS TRANSMITTED (USING STEPLU AND LULOOP) 
1142 ;* AND THE PROGRAM MONITORS THE OCCURRENCE OF USYRT TX BUFFER EMPTY FLAGS 
1143 ;* (BY SCANNING ORDY AND OCOR) AND OACT, AT EACH STEP. THE TEST IS DONE IN 
1144 3* CHARACTER ORIENTED PROTOCOL MODE, USING 8-BIT CHARS AND CRC(-16. 
1145 ;* THE FOLLOWING STEPS ARE DONE: 
1146 ;* A MASTER CLEAR IS DONE, AND THE LINE UNIT IS PLACED IN CHAR MODE. 
1147 7* SOM IS SET TWICE TO SEND 2 SYNCH CHARS. THEN, 2 000 CHARS ARE SENT, AND 
1148 3;* THEN 2 TERMINATING SYNCHS ARE SENT. 
1149 ;* THE TRANSMITTER IS THEN DISABLED, USING OC, AND OACT IS MONITORED FOR THE 
1150 3* CLEARED STATE AFTER THE 3RD SYNCH COMPLETES. 
1151 LL RRER EEA A EEA EARE RARER Re 
1152 027264 BGNTST 

027264 T25:: 
1153 027264 012737 027376 002362 MOV HAS ,RETADR ;SET TEST EXIT ADDRESS FOR ERRORS 
1154 027272 004737 005512 JSR PC, INITRN 7DO MASTER CLR, LOAD 2 SOM'2 
1155 027276 000226 SYNCH 
1156 027300 000011 STRIP! DDCMP 
1157 027302 004737 006074 JSR PC, TXCHAR ;LOAD A 000 CHAR, TX FIRST SYNCH (226) 
1158 027306 000000 000 
1159 027310 100010 CHPCHK!8. 
1160 027312 004737 006074 JSR PC, TXCHAR ;LOAD 2ND 000 CHAR, TX 2ND SYNCH 
1161 027316 000000 000 
1162 027320 000010 8. 
1163 027322 004737 006074 JSR PC, TXCHAR ;LOAD EQM CHAR, TX FIRST 000 CHAR 
1164 027326 001000 TXEOM 
1165 0273 000010 8. 
1166 027332 004737 006074 JSR PC, TXCHAR ;LOAD EOQM CHAR, TX 2ND 000 CHAR 
1167 027336 001000 TXEOM 
1168 027340 000010 ' 
1169 027342 004737 006074 JSR PC, TXCHAR ;LOAD EOM, TX CRC-16 CHAR 
1170 027346 001000 TXEOM 
1171 027350 000020 . 
1172 027352 004737 006074 JSR PC, TXCHAR ;LOAD EQM, TX FIRST TERMINATING SYNCH 
1173 027356 001000 TXEOM 
1174 027360 000010 , 
1175 027362 004737 006074 JSR PC, TXCHAR ;LOAD EOM, TX 2ND TERMINATING SYNCH 
1176 027366 001000 TXEOM 
1177 027370 000010 


=o 


ea ast os ss as St ot as SI SS YH HS SG 
SaDosoooanooaaaeaane 
Pt enlaces 


201 027404 
027404 
1202 027404 


Ss 
g 


ec ee ee a ee ee eh ed ed ed ed ed 
MONMEMPoMNoNMNonoNofNony 
Nie eV SV os SS SS 
SOBNAUSWN-O 


004737 
004737 


104401 


es 


SSSS3ssssEss 
eee 


— lo) S 
R 

> a 
oOo Ww WA 
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- TX MSG TIMING TEST, 


006246 
003576 


006074 
006074 
006074 
006074 
006074 
006074 


006246 
003576 
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MACRO VO03. 01 4iZaoct= 79 SEQ 147 
CHAR MODE, WITH CRC 
z JSR PC, ENDTRN :SET OC, MONITOR OCOR 
; PC,MSTCLR Z ISSUE MASTER CLEAR TO CLEAN UP 
ENDTST 
L10053: 
TRAP C$ETST 
FFARR AREAREARAERARRRERERERRERREKERERERERREERRRRGRERARRAREREAERRRRAERRRARARARE 
" SBTTL TEST 24 = TX MSG TIMING TEST, BIT MODE, WITH CRC 
** 
‘* IN THIS TEST, AN ENTIRE MESSAGE IS TRANSMITTED (USING STEPLU AND LULOOP) 
‘* AND THE PROGRAM MONITORS THE OCCURRENCE OF USYRT TX BUFFER EMPTY FLAGS 
+* (BY SCANNING ORDY OCOR) AND OACT, AT EACH STEP. THE TEST IS DONE IN 
:* BIT ORIENTED PROTOCOL MODE, USING 8-BIT CHARS AND CRC-CCITT-1. 
:* THE FOLLOWING STEPS ARE DONE: 
:* A MASTER CLEAR IS DONE, AND THE LINE UNIT IS PLACED IN BIT MODE. 
t* SOM IS SET TWICE TO SEND 2 FLAG CHARS. THEN, 2 000 CHARS ARE SENT, AND 
:* THEN 2 TERMINATING FLAGS ARE SENT. 
:* THE TRANSMITTER IS THEN DISABLED, USING OC, AND OACT IS MONITORED FOR THE 
>* CLEARED STATE. 
SSAA AER EREREREEREERREEREEREREEARREREEREREREARERARERERRERRERHERRERORRERER ED 
BGNTST a, 
002362 MOV #AS ,RETADR :SET TEST EXIT ADDRESS FOR ERRORS 
SR PC, INITRN “DO MASTER CLR, LOAD 2 SOM'2 
000 
JSR PC, TXCHAR :LOAD A 000 CHAR, TX FIRST FLAG 
CHPCHK ! 8. 
JSR PC, TXCHAR :LOAD 2ND 000 CHAR, TX 2ND FLAG 
8. 
SR PC, TXCHAR :LOAD EOM CHAR, TX FIRST 000 CHAR 
8. 
SR PC, TXCHAR :LOAD EOM, TX 2ND 000 CHAR AND CRC-CCITI-1 CHAR 
24. 
JSR PC, TXCHAR :LOAD EOM, TX FIRST TERMINATING FLAG 
TXEOM 
JSR PC, IXCHAR ;LOAD EQM, TX 2ND TERMINATING FLAG 
TxEOm 
* JSR PC,ENDTRN :SET OC, MONITOR OCOR 
j PC .MSTCLR : ISSUE MASTER CLEAR TO CLEAN UP : 
ENDTST 
L 10054: 
TRAP  —- CSETST 
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TEST 24 = TX MSG TIMING TEST, BIT MODE, WITH CRC 


1230 
1231 
1232 
1233 SPARE ERA E AREER RAEEEEEHERERARERAREERAAREREREERAEEHHEERHET AHH EREEEES 
\See . SBITL TEST 25 = TX MSG TIMING TEST, CHAR MODE, WITH NO CRC 
1236 ;* IN THIS TEST, AN ENTIRE MESSAGE IS TRANSMITTED (USING STEPLU AND LULOOP) 
1237 ;* AND THE PROGRAM MONITORS THE OCCURRENCE OF USYRT TX BUFFER EMPTY FLAGS 
1238 ;* (BY SCANNING ORDY AND OCOR) AND OACT, AT EACH STEP. THE TEST IS DONE IN 
1239 :* CHARACTER ORIENTED PROTOCOL MODE, USING 8=BIT CHARS AND NO ERROR CHECKING. 
1240 7* THE FOLLOWING STEPS ARE DONE: 
1241 ;* A MASTER CLEAR IS DONE, AND THE LINE UNIT IS PLACED IN CHAR MODE. 
1242 ;* SOM IS SET TWICE TO SEND 2 SYNCH CHARS. THEN, 2 000 CHARS ARE SENT, AND 
1243 3* THEN 2 TERMINATING SYNCHS ARE SENT. 
1244 ;* THE TEST IS PERFORMED WITH TXEN (REG14, BIT6) SET. AND THE PROGRAM CHECKS 
1245 ;* THAT THIS HOLDS RTS HIGH PAST THE END OF THE MESSAGE. 
1246 ;* THE TRANSMITTER IS THEN DISABLED, USING OC, AND OACT IS MONITORED FOR THE 
1247 3* CLEARED STATE. 
1248 CLARA ARERR E EERE EEEEEEERERERRERAREAARAREERAEEEEREREARERREERHEEEEKRERE RHEE EEE 
1249 027514 BGNTST 

027514 T25:: 
1250 027514 012737 027702 002362 MOV #A6,RETADR SET TEST EXIT ADDRESS FOR ERRORS 
1251 027522 37 005512 JSR PC, INITRN ;DO MASTER CLR, LOAD 2 SOM’2 
1252 027526 000226 SYNCH 
1253 027530 000311 CRC2!CRC1!STRIP!DDCMP 
1254 027532 012737 000014 002400 MOV #14,REGNUM ;SET REG NO. = 14 
1255 027540 012737 000100 002366 MOV #TXEN,WRIBYT ;SET TXEN BIT 
1256 027546 004737 003722 JSR PC ,WRITLU ;LOAD TXEN BIT IN REG 14 
1257 027552 004737 006074 JS PC, TXCHAR ;LOAD A 000 CHAR, TX FIRST SYNCH (226) 
1258 627556 000000 900 
1259 027560 100010 CHPCHK!8. 
1260 027562 004737 006074 JSR PC, TXCHAR ;LOAD 2ND 000 CHAR, TX 2ND SYNCH 
1261 027566 000000 000 
1262 027570 000010 a 
1263 027572 004737 006074 JSR PC, TXCHAR ;LOAD EOM CHAR, TX FIRST 000 CHAR 
1264 027576 001000 TXEOM 
1265 027600 000010 8. 
1266 027602 004737 006074 JSR PC, TXCHAR ;LOAD EOM CHAR, TX 2ND 000 CHAR 
1267 027606 001000 TXEOM 
1268 027610 000010 ‘ 
1269 027612 004737 006074 JSR PC,TXCHAR ;LOAD EOM, TX FIRST TERMINATING SYNCH 
1270 027616 001000 TXEOM 
1271 027620 000010 . 
1272 027622 004737 006074 JSR PC, TXCHAR ;LOAD EOM, TX 2ND TERMINATING SYNCH 
1273 027626 001000 TXEOM 
1274 027630 000010 m 
1275 027632 004737 005226 JSR PC,STPLU ;CLK PAST END OF MSG 
1276 027636 000030 24. 
1277 027640 012737 000013 002400 MOV #13,REGNUM SET REG NO. = 13 
1278 027646 004737 003644 JSR PC ,READLU READ REG 13 
1279 027652 032737 000040 002364 BIT #RTS,REDBYT :CHK FOR RTS STILL SET 
1280 027660 001006 BNE $ :BR IF RTS SET 
1281 027662 004737 004500 JSR PC ,GETALL GET REGS FOR PRINTOUT 
1282 REPORT RTS NOT SET 
1283 027666 ERRDF 60,EM60,ERR7 

027666 104455 TRAP CSERDF 


027670 000074 . WORD 60 
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TEST 25 = TX MSG TIMING TEST, CHAR MODE, WITH 
027672 014204 -WORD EM6 
027676 017444 “WORD  ERR7 
1284 027676 004737 006246 3$: JSR PC ,ENDTRN :SET OC, MONITOR OCOR 
1285 027702 AG: 
1286 027702 004737 003576 JSR PC ,MSTCLR ; ISSUE MASTER CLEAR TO CLEAN UP 
1287 027706 ENDTST 
027706 L10055: 
027706 104401 TRAP CSETST 
1285 
1289 
1290 
1291 
1292 
1293 TEP PR RRR R RE RRRASESASALRERE RRS SES ES RRR RRR RR RRA RR RRR RRS RRR RRR RR RRR ER RRR RRR RRR RRR RRS ED 
is - SBTTL TEST 26 = TX UNDERRUN SET AND CLEAR TEST = CHAR MODE 
1296 :* IN THIS TEST, A TX UNDERRUN ERROR . FORCED IN EACH OF 2 SITUATIONS, 
1297 ;* AND THEN CLEARED DIFFERENTLY IN EAC 
1298 ;* IN THE FIRST, A MESSAGE IS INITIATED: A 000 CHAR IS SENT, AND THE TX 
1299 ;* BUFFER IS NOT SERVICED IN RESPONSE TO THE USYRT TX BUFFER EMPTY FLAG, 
1300 ;* WHICH CAUSES UNRR TO SET IN REG 11. THEN, SOM IS SET TO CLEAR THE ERROR, 
1301 ;* AND THIS IS VERIFIED. 
1302 :* IN THE SECOND SITUATION, A MSG IS INITIATED, A O00 CHAR IS SENT, AND THE TX 
1303 :* BUFFER IS NOT SERVICED IN RESPONSE TO THE USYRT TX BUFFER EMPTY FLAG, WHICH 
1304 ;* AGAIN CAUSES UNRR TO SET. THEN, A MASTER CLEAR IS DONE, AND THE UNRR BIT 
1305 >* IS CHECKED TO BE CLEARED. 
1306 2 -ARRRRARBARAASZALALASZASSESRARSS SEES SRRARARRRRRRRRRRARRR RR RR RRR RRR RRR SRR RAR RRR SSE SS SD 
1307 027710 BGNTST 
027710 Te6i: 
SEES gnesetinetintatssnerenenenensennnneananatinemnmnaenenaesmnansemeneeiedinahiiararsstndsisinnnninnsnnniinemanians 
fe ; CAUSE TX UNDERRUN, CHK UNRR = 1; SET SOM, CHK UNRR = 0 
1311 027710 012737 030246 002362 MOV #A7,RETADR ;SET TEST EXIT ADDRESS FOR i 
1312 027716 004737 005512 JSR PC, INITRN ‘DO MASTER CLEAR, LOAD 2 SOM'S 
1313 027722 000226 SYNCH 
1314 027724 000011 STRIP! DDCMP 
1315 027726 004737 006074 JSR PC,TXCHAR ;LOAD A 000 CHAR, TX FIRST SYNCH 
1316 027732 000 
1317 027734 100010 CHPCHK!8. 
1318 027736 004737 005226 JSR PC,STPLU : CLOCK THE TRANSMITTER UNTIL 7 BITS OF 
1319 027742 000016 14, THE 000 CHAR HAVE BEEN TRANSMITTED 
1320 027744 012737 000011 002400 MOV #11,REGNUM SET LU REG NO. = 11 
1321 027752 004737 003644 JSR PC ,READLU *READ REG 11 
1322 027756 132737 000001 002364 BITB MUNRR ,REDBYT :CHK FOR UNRR = 0 
1323 0277 001410 BEQ 6$ ‘BR IF UNRR 0 
1324 027766 004737 004500 JSR PC,GETALL :GET REGS FOR PRINTOUT 
1325 :REPORT UNRR NOT CLEARED 
1326 027772 ERRDF 16,EM16,ERR7 
027772 104455 TRAP CSERDF 
027774 00002 . WORD 16 
027776 012576 -WORD EM16 
030000 017444 -WORD ERR? 
1327 030002 000137 030246 JMP A7 ;SKIP TO END OF TEST 
1328 030006 004737 005226 6$: JSR PC,STPLU :CLOCK LAST BIT OF OQOO CHAR 
1329 030012 00000 3 
1330 030014 004737 003644 : JSR PC ,READLU ;READ REG 11 
1331 030020 132737 000001 002364 BITB #UNRR ,REDBYT :CHK FOR UNRR = 1 


Poa 


“mo 
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TEST 26 = TX UNDERRUN SET AND CLEAR TEST = CHAR MODE 


1332 030026 001010 BNE 9$ ;BR IF UNRR = 1 

1333 030030 004737 004500 JSR PC,GETALL :GET REGS FOR PRINTOUT 

133% ;REPORT UNRR NOT SET 

1335 030034 ERRDF 14,EM14,ERR7 
030034 104455 TRAP CSERDF 
030036 000016 «WORD 14 
030040 012532 .WORD EM14 
030042 017444 .WORD ERR7 

1336 030044 000137 030246 JMP A7 ;SKIP TO END OF TEST 

1337 030050 012737 000600 002422 9$: MOV #TXSOM,TXWORD ;SET SOM CHAR TO BE WRITTEN 

1338 030056 737 005146 JSR PC,LDTXSI ;LOAD SOM CHAR INTO TX SILO 

1339 030062 004737 005120 JSR PC ,WAITSO ;WAIT FOR SILO DATA TO RIPPLE 

1340 030066 004737 005226 JSR PC,STPLU :CLOCK LU FOR 2 CYCLES 

1341 030072 000002 2 

1342 030074 004737 003644 JSR PC ,READLU ZREAD REG 11 

1343 030100 132737 000001 002364 BITB #UNRR ,REDBYT :CHK FOR UNRR = 0 

1344 030106 001410 BEQ 12% ;BR IF UNRR = 0 

1345 030110 004737 004500 JSR PC,GETALL ;GET REGS FOR PRINTOUT 

1346 :REPORT UNRR NOT CLEARED BY SOM 

1347 030114 ERRDF 13,EM13,ERR7 
030114 104455 TRAP CSERDF 
030116 15 WORD 13 
030120 012502 WORD €M13 
030122 017444 WORD ERR7 

1348 030124 000137 030246 JMP A7 ;SKIP TO END OF TEST 

Hf 84 030130 12$ 

it ; CAUSE TX UNDERRUN, CHK UNRR = 1; DO MASTER CLR, CHK UNRR = 0 

wp) FR ORS RSS USS es 

1353 030130 004737 005512 JSR PC, INITRN ;DO MASTER CLEAR, LOAD 2 SOM'S 

1354 030134 000226 SYNCH 

1355 030136 000051 IDLE! STRIP! DDCMP 

1356 030140 004737 006074 JSR PC, TXCHAR ;LOAD A 000 CHAR, TX FIRST SYNCH 

1357 030144 000000 000 . 

1358 030146 100010 CHPCHK!8. 

1359 030150 004737 005226 JSR PC, STPLU ;STEP THE LU UNTIL 000 HAS BEN TRANSMITTED 

1 030154 000021 17. 

1361 030156 004737 003644 JSR PC READLU READ REG 11 

1362 030162 132737 000001 002364 BITB #UNRR ,REDBYT ;CHK FOR UNR = 1 

1363 030170 001010 BNE 16$ ;BR IF UNRR = 1 

1364 030172 004737 004509 JSR PC,GETALL :GET REGS FOR PRINTOUT 

1365 ;REPORT UNRR NOT SET 

1366 030176 ERRDF 14,EM14,ERR7 
030176 104455 TRAP CSERDF 
030200 000016 «WORD 14 
030202 012532 «WORD EM14 
0302046 017444 -WORD ERR? 

1367 000137 030246 JMP A7 :SKIP TO END OF TEST 

1368 030212 004737 003576 16%: JSR PC,MSTCL * ; ISSUE MASTER CLEAR 

1369 030216 004737 4 JSR PC ,READLU ;READ REG 11 

1370 030222 132737 O00001 007464 BITB MUNRR ,REDBYT ;CHK FOR UNRR = 0 

1371 030230 001406 BEQ A7 ;BR IF UNRR = 0 

1372 030232 004737 004500 JSR PC ,GETALL :GET REGS FOR PRINTOUT 

1373 :REPORT UNRR NOT CLEARED BY OC 

1374 030236 ERRDF 15, EMIS, ERR7 
030236 104455 TRAP CSERDE 
030240 000017 -WORD 15 
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030262 012547 WORD EMTS 
030244 017444 WORD &RR7 
1375 9030246 004737 003576 A?: JSR PC MSTCLAR : ISSUE CLEAN-UP MASTER (_FAR 
1376 030252 ENDTST 
030252 110056: 
030252 104401 "PAP ‘SETST 
1377 
1378 
1379 
138C 
1381 
1382 FF SATA ARARARAAARAARARRARERAERAARAKARARAARARAARAAREKARARAAAARAAARAAARRARAAAARAAAETADAAE AS 
tt, .SBTTL TEST 27 = TRANSMIT CHAR LENGTH TIMING TEST = CHAR MODE, CRC 
1385 * THE LINE UNIT IS PLACED IN CHAR MODE (DDCMP) AND A MESSAGE IS INITIATED 
1386 * WITH AN 8-BIT SYNCH AND A 5-BIT SYNCH CHAR NEXT, A OOO CHAR IS SENT WITH 
1387 * EACH OF THE FOLLOWING TX CHAR LENGTHS : 5 BITS, 6 BITS, 7 BITS, 8 BITS. 
1388 * (FOR EXAMPLE, A 5-BIT CHAR REQUIRES 5 CLOCK CYCLES TO BE TRANSMITTED). TwO 
1389 ;* TERMINATING SYNCHS ARE SENT AFTER THE DATA. 
1390 Py PRR RRRRRBEASSRASAAAALALAERLALASESASE SESE ERS ERS RRR SERRE RRR RRR RRR RRR RRR RRR SERRE ESR RSE ES 
1391 030254 BGNTST 
030254 ”" T2?7: 
1392 030254 012737 030462 002362 MOV #A8 ,RETADR ;SET TEST EXIT ADDRESS FOR ERRORS 
1393 030262 004737 005512 JSR PC, INITRN 7DO MASTER CLR, LOAD 2 SOM'S 
1394 930266 000 
1395 030270 000041 IDLE! DDCMP 
1396 030272 012737 000006 002402 MOV #6, “ge ;SET BYTE NO. = 6 FOR AX3 
1397 030300 012737 000000 002374 MOV #000, WAX :SET DATA FOR AX3-15 = 0 
1398 030306 012737 000240 002376 MOV ATXLENZ2! a $4 7SET TX LENGTH = S FOR AX3-16 
1399 030314 004737 004264 JSR PC ,WRI TAX LOAD AX3-15,AX3-16 
4 030320 004737 006074 JSR PC, TXCHAR sLOAD 5-BIT 000 CHAR, TX 8-BIT SYNCH 
1401 030324 10 
1402 030326 100010 CHPCHK!8. 
1403 030330 004737 006074 PC, TXCHAR :LOAD 6-BIT 000 CHAR, TX 5-BIT SYNCH 
1404 030334 000 
1405 030336 000005 
1406 030340 012737 000300 002376 MOV #TXLEN2! TXLEN1T,WAX16 
1407 030346 004737 004264 JSR PC ,WRI TAX ;SET TX CHAR LENGTH = 6 
1408 030352 004737 006074 JSR PC, TXCHAR :LOAD 7-BII 000 CHAR, TX 5=-BIT 000 CHAR 
1409 030356 000 
1410 03036C 000005 5 
1411 030362 012737 000340 002376 MOV ty t,t cesaidhee” ag WAX16 
1412 030370 004737 004264 JSR PC,WRITA -SET TX CHAR LENGTH = 7 
1413 030374 0064737 006074 JSR PC, TXCHAR OAD 8-BIT 000 CHAR, TX 6=-BIT COO CHAR 
1414 030400 000 
1415 030402 000006 6 
1416 030404 012737 000000 002376 MOV #000, WAX16 
1417 030412 004737 2 JSR PC WRI TAX :SET TX CHAR LENGTH = 8 
1418 030416 004737 006074 JSR PC, TXCHAR :LOAD EOM, TX 7-BIT 000 CHAR 
1419 030422 001000 TXEOM 
1420 030424 000007 
1421 030426 004737 006074 JSR PC, TXCHAR ;LOAD EOM, TX 8-BIT 000 CHAR 
1422 030432 001000 TXEOM 
1423 030434 000010 
1424 030436 004737 006074 JSR PC, TXCHAR ;LOAD EOM, TX CRC-16 CHAR 
1425 030442 001000 TXEOM 
1426 030444 000020 16. 


oe M8203 STATIC DIAG #1 
ST 27 = TRANSMIT CHAR LENGTH TIMING TEST = CHAR MODE, 


1427 030446 


1432 030462 
030462 
030462 


1470 030576 


1480 030642 


006074 


006246 


031012 
005512 


006074 


006074 


006074 


J 12 
MACRO V03.01 17-0CT=79 08: Pg 54 pace 24-31 SEQ 152 


002362 


002402 
002374 
002376 


002376 


002376 


002376 


JSR PC, TXCHAR :LOAD EOM, TX FIRST TERMINATING SYNCH 
TXEOM 
: JSR PC ,ENDTRN :CLEAR TRANSMITTER 
AB: 
ENDTST 
L10057: 


TRAP CSETST 


fF RAAAAARARAAAAAARARRARARAAERARARRARAAAARAARKEERARAARARRARRARAAAAARARARARAARRARAAAEHD 


. SBTTL TEST 28 = TRANSMIT CHAR LENGTH TIMING TEST = BIT MODE, CRC 


THE LINE UNIT IS PLACED IN BIT MODE AND A MESSAGE IS INITIATED 
WITH 2 FLAG CHARS. NEXT, 2 8-BIT O0U CHARS ARE SENT, FOLLOWED BY 000 CHARS 
WITH EACH OF Ht FOLLOWING TRANSMITTER CHAR LENGTHS: 
1 BIT, 2 BIT BITS, 4 BITS, 5 BITS, 6 BITS, 7 BITS, AND 8 BITS. 
(FOR EXAMPLE, A sat CHAR REQUIRES 5 CLOCK CYCLES TO BE TRANSMITTED). 
TwO TERMINATING FLAGS ARE SENT AFTER THE DATA. 


SL RARER ARERARAARARERERAEERAERARAERAERARRAEAARAERAARARARERRAERRERATRERERRE RHEE 


BGNTST 


aeneneees 


Fae 3 
MOV #A9,RETADR :SET TEST EXIT ADDRESS FOR ERRORS 
JSR PC, INITRN 7DO MASTER CLR, LOAD 2 SOM'S 
000 
JSR PC, TXCHAR ;LOAD FIRST 8-BIT 000 CHAR, TX FIRST FLAG 
CHPCHK !8. 
JSR PC, TXCHAR ;LOAD 2ND 8=BIT 000 CHAR, TX 2ND FLAG 
8. 
JSR PC, TXCHAR :LOAD 1-BIT 000 CHAR, TX FIRST 8-BIT 000 CHAR 
8. 
MOV #6, AXNUM :SET BYTE NO. = 6 FOR AX3 
MOV #000, WAX15 ‘SET DATA FOR AX3-15 = 0 
MOV MTXLENO,WAX16 ;SET TX CHAR LENGTH = 1 FOR AX3-16 
JSR PC WRI TAX =LOAD AX3-15,AX 3-16 
JSR PC, TXCHAR :LOAD 2=BIT 000 CHAR, TX 2ND 8-BIT 000 CHAR 
8. 
MOV #TXLEN1,WAX16 
JSR PC ,WRITAX sSET TX CHAR LENGTH = 2 
JSR PC, TXCHAR *LOAD 3-BIT 000 CHAR, TX 1-BIT 000 CHAR 
1 
MOV MTXLENT! TXLENO,WAX16 
JSR PC WRI TAX SET TX CHAR LENGTH = 3 
J5R PC, TXCHAR “LOAD 46-BIT 000 CHAR, TX 2=BIT 000 CHAR 
2 


MOV MITXLENC, WAX16 
JSR PC ,WRITAK ZSET 1K CHAR LENGTH = 4 
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1481 030646 004737 006074 JSR PC, TXCHAR LOAD 5=BIT 000 CHAR, TX 3=BIT 000 CHAR 
1482 030652 000000 000 
1483 030654 000003 

030656 012737 000240 002376 MOV ate WAX16 
1485 030664 004737 004264 JSR PC ,WRITA sSET TX CHAR LENGTH = 5 
1486 030670 004737 006074 JSR PC, TXCHAR ‘LOAD 6-BIT 000 CHAR, TX 4-BIT 000 CHAR 
1487 030674 000000 000 
1488 030676 000004 4 
1489 030700 012737 000300 002376 MOV tye oy thi sae WAX16 
1490 030706 004737 004264 JSR PC,WRITA SET TX CHAR LENGTH = 6 
1491 030712 004737 006074 JSR PC, TXCHAR ‘LOAD 7=BIT 000 CHAR, TX 5=BIT 000 CHAR 
1492 030716 000000 000 
1493 0307 000005 5 
1494 030722 012737 000340 002376 MOV there) geben Tae WAX16 
1495 030730 004737 004264 JSR PC,WRITA SET TX CHAR LENGTH = 7 
1496 030734 004737 006074 JSR PC, TXCHAR LOAD 8-BIT OCO CHAR, TX 6-BIT 000 CHAR 
1497 030740 000000 000 
1498 030742 6 
1499 030744 012737 000000 002376 MOV #000, WAX16 
1500 030752 004737 004264 JSR PC ,WRI TAX SET TX CHAR LENGTH = 8 
1501 030756 004737 006074 JSR PC, TXCHAR :LOAD EOM, TX 7-BIT 000 CHAR 
i502 030762 001000 TXEOM 
1503 030764 000007 

0307 004737 006074 JSR PC, TXCHAR ;LOAD EOM, TX 8-BIT 000 CHAR, CRC=CCITT=-1 CHAR 
1505 030772 001000 TXEOM 
15U6 030774 000031 os 
1507 030776 004737 006074 JSR PC, TXCHAR :LOAD EOM, TX FIRST TERMINATING FLAG 
1508 031002 061000 TXEOM 
1509 031 000010 _ 
1510 031006 004737 006246 JSR PC ,.ENDTRN CLEAR TRANSMITTER 
1511 031012 AS: 
1512 031012 ENDTST 

031012 L 10060: 

031012 104401 TRAP CSETST 
1513 
1514 
1515 
1516 
1517 
1518 WEARER ERSSSOSSSSSSASSESEESE SERRE SEER EEE SE ERR REE RRR ESSER SERRE SSS SRR RRR R SS S| 
ety » SBITL TEST 29 = TXDATA BIT TEST - CHAR MODE, NO CRC 
oe ) 
1521 ‘* THE LINE UNIT IS INITIALIZED AND A MSG IS INITIATED (USING STEPLU) WITH CRC- 
1522 :* 16 SELECTED IN CHAR MODE. TWO SYNCHS, 000,125,252, 377,000, AND 2 TERMINATING 
1523 S* SYNCHS ARE THEN SENT. THE PROGRAM CHECKS EACH BIT OF THE TRANSMITTED 
1524 :* DATA CHARS, BY MONITORING TXDATA (REG 17) AS THE DATA IS CLOCKED OuT OF 
1525 :* THE USYRT TRANSMITTER, 
1526 rey RATARAAAAARATAERARAAARARARAEAARARERARARAAARAEARAARAAKREARAREEAERERERERREKRHEEKRERE EERE ee 
1527 031014 BGNTST 

31014 129:: 

1528 031014 004737 005512 JSR PC, INI TRN DO MASTER CLR, LOAD 2 SOM'S 
1529 031020 000226 SYNCH 
1530 031022 11 STRIP! DDCMP 
1531 031024 012701 003224 MOV #SG1+4,R1 :GET POINTER TO DATA 
1932 031030 010103 MOV R1,R3 
1533 031032 012137 002422 3$: MOV (R1) +, TXWORD 
1534 031036 004737 005146 JSR PC,LDTXS! LOAD A DATA CHAR INTO 'X SILO 
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TEST 29 = TXDATA BIT TEST = CHAR MODE, NO C 

1535 0310462 020127 003242 CMP R1,4MSG1+18. ;SEE IF ALL CHARS LOADED YET 
1536 031046 103771 BLO 3$ [BR IF NOT YET 
1537 031050 004737 005120 JSR PC ,WwAITSO ;WAIT FOR SILO TO RIPPLE 
1538 031054 004737 005226 SR PC, STPLU ;CLOCK LU UNTIL SYNCHS ARE TX'D 
1539 031060 100020 CHPCHK ! 16 
1540 031062 011337 031072 6$ MOV (R3) ,8$ :GET EXPECTED DATA CHAR 
1541 031066 737 011150 JSR PC, CKTBIT ;CHECK TXDATA FOR CHAR BITS 
1542 031072 8$: «WORD 0 sEXPECTED CHAR GOES HERE 
1543 031074 703 000002 ADD #2,R3 ; INCR PATTERN POINTER 
1544 031100 020327 003236 CMP R3,4MSG1+14. SEE IF ALL “ CHECKED YET 
1545 031104 103766 BLO $ IF NOT YET 
1546 031106 004737 003576 16$: JSR PC,MSTCLR + ISSUE MASTER CLEAR TO CLEAN UP 
1547 031112 ENDTST 

031112 L10061: 

031112 104401 TRAP CSETST 
1548 4 
1549 
1550 
1551 
1552 
1553 FF RRHRARAAAAAAARAARAARARAARARARAARAAAAARAARAAAARRARAAARAAAAAAAARAAAAARAARAARAEARARE 
uP . SBTTL TEST 30 - USYRT RECEIVER MSG TEST = CHAR MODE, CRC 

** 

1556 ;* THE LINE UNIT IS INITIALIZED AND A MESSAGE IS INITIATED (USING a WITH 
15S7 3* LULP (REG 12) SET TO LOOP THE DATA ie IN THE USYRT, AND WITH CRC-16 
1558 z* SELECTED. TWO SYNCHS, 000,125,252,377,000, AND FOUR TERMINATING SYNCHS ARE 
1559 ;* SENT. THE PROGRAM MONI TORS IACT, AND THE RCV'D CHARS AND CRC BYTES ARE READ 
1560 ;* FROM AXO-15 AND COMPARED TO EXPECTED VALUES. THE PROGRAM THEN CHECKS FOR IACT 
1561 s* STILL SET AFTER THE MESSAGE. 
1562 LLU EERE AAA APART A RAAT AEA AAR E RARER RARER eee 
1563 031114 BGNTST 

031114 T30:: 
1564 031114 012737 031456 002362 MOV #24$,RETADR sSET TEST EXIT ADDRESS FOR ERRORS 
1565 031122 004737 003576 JSR PC,.MSTCLR ; ISSUE MASTER CLEAR 
1566 031126 004737 010612 JSR PC, SETUP ;PROGRAM THE USYRT 
1567 031132 000226 SYNCH 
1568 031134 000013 STRIP! TERR! DDCMP 
1569 031136 000 
1570 031140 000 
1571 031142 012737 12 002400 MOV #12,REGNUM 3SET LU REG NO. = 12 
1572 031150 5037 002402 CLR 7SET AX BYTE NO. = 0 FOR AxO 
1573 031154 112737 0 002366 MOVB MLULP ,WRIBYT 
1574 031162 004737 003722 JSR PC, ,WRITLU ;SET LULP IN REG 12 
1575 031166 012701 003220 MOV 4MSG1,R1 :GET POINTER TO MSG DATA TABLE 
1576 031172 012137 002422 3$: MOV (R1) +, TXWORD ;GET CHAR TO BE LOADED 
1577 031176 004737 005146 JSR PC,LDTXSI ;LOAD CHAR INTO TX SILO 
1578 031202 020127 003246 CMP R1,4MSG1+22. 7SEE IF ALL MSG CHARS LOADED YET 
1579 031206 103771 BLO 3$ 7BR IF NOT YET 
1580 031210 004737 005120 JSR PC ,WAITSO ;ALLOW DATA TO RIPPLE IN SILO 
1581 031214 004737 005226 JSR PC,STPLU ;CLOCK LU FOR 40 CYCLES (UNTIL FIRST 
1582 031220 0000 40. ; DATA CHAR IS ABOUT TO BE RECEIVED) 
1583 031222 004737 006666 JSR PC, IACTIV SCHK IACT = 0 
1584 031226 0 
1585 031230 004737 005226 JSR PC,STPLU ;CLOCK LU UNTIL 1ST DATA CHAR IS RCV'D 
1586 031234 000006 6 
1587 031236 012701 003224 MOV #MSG1+4,R1 
1588 031242 004737 10$: JSR PC, IACTIV 3CHK IACT = 1 
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1589 031246 
004076 PC ,READAX ;READ Ax0 
002370 RAX15,(R1)+* ; COMPARE RCV"D CHAR TO EXPECTED 
12$ ;BR_IF RCV‘°D DATA Ok 
177776 -2(R1),GOODAT  ;GET EXPECTED — 
002370 RAX15 ,BADDAT GET ACTUAL DAT 
1595 031276 004737 004500 JSR PC,GETALL >GET REGS FOR PRINTOUT 
1596 ; INCORRECT DATA CHAR RCV'D 
1597 Olan ERRDF 26,EM26,ERR3 


24$ 
PC, STPLU :CLOCK LU 8 CYCLES 
R1,4MSG1+14. :SEE IF CHECKING HI CRC BYTE YET 
10$ ‘BR IF NOT YET 
PC, IACTIV =CHK IACT = 1 
PC ,READAX ;READ AXO 
RAX15, #160 [CMP RCV'D CHAR TO EXPECTED HI CRC BYTE 
16$ ‘BR IF HI CRC BYTE RCV'D Ok 
#160, GOODAT *GET EXPECTED DATA 
1609 031360 : RAX15,BADDAT = SET ACTUAL DAT 
1610 031366 004737 004500 JSR PC,GETALL “GET REGS FOR PRINTOUT 


: INCORRECT CRC BYTE RCV'D 
1612 031372 ERRDF 27,EM27,ERR3 
031372 


24$ 
PC,STPLU :CLOCK LU FOR 8 CYCLES 
PC, IACTIV 7CHK IACT = 1 
#034 ,GOODAT READ AKO. LO CRC BYTE 
CMP RCV'D CHAR TO be LO CRC BYTE 
14$ BR IF LO CRC INCORREC 
PC,STPLU CLOCK LU 8 CYCLES 
PC, IJACTIV :CHK IACT STILL = 1 
PC.MSTCLR ; ISSUE CLEAN-UP MASTER CLEAR 


L10062: 
TRAP CSETST 


PRR A RAR ARR A AAA RARER AEA EE ARERR ERRATA ARERR ATA R ARR A AAT A eRe eRe ERE 
- SBTTL TEST 31 = USYRT RECEIVER MSG TEST = BIT MODE, CRC 
. 
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1636 3* THE LINE UNIT IS_ INITIALIZED AND A MESSAGE IS INITIATED (USING STEPLU) WITH 
1637 3* LULP (REG 12) SET TO LOOP THE DATA INTERNALLY IN THE USYRT, AND WITH CRC- 
1638 3* CCITT=1. TWO FLAGS, ag 125,252,377,000, AND TWO TERMINATING FLAGS ARE THEN 
1639 :* SENT. THE PROGRAM MONITORS IACT, . THE RCV"D CHARS ARE READ 
1640 3* FROM AXx0-15 COMPARED TO EXPECTED ge THE PROGRAM THEN CHECKS FOR 
1641 :* IACT = 0, SETS IC TO CLEAR THF RECEIVER, AND CHECKS FOR JIACT STILL = 0. 
1642 MARRBARAAALAAAALALALALARLARAASLERAAAASAEAARAELER RASA AS RRA RASA ARR ARR SAAR RAR RRA ARR R SS! 
1643 Serene BGNTST 7 
1644 031464 012737 032020 002362 MOV #24$ ,RETADR ;SET TEST EXIT ADDRESS FOR ERRORS 
1645 031472 004737 003576 JSR PC,MSTCLR ZISSUE MASTER CLEAR 
1646 031476 004737 010612 JSR PC,SETUP [PROGRAM THE USYRT 
1647 031502 000000 000 
1648 031504 000002 ‘ IERR 
1649 031506 000000 000 
1650 031510 000000 000 
1651 031512 012737 12 002400 MOV #12 ,REGNUM SET LU REG NO. = 12 
52 031520 5037 002402 CLR AXNUM SET AX BYTE NO. = 0 FOR AXxO 
1653 031524 112737 0 002366 MOVB #MLULP,,WRIBYT 
1654 031532 737 003722 JSR PC ,WRITLU SET LULP_IN REG 12 
1655 031536 012701 003220 MOV #MSG1,R1 [GET POINTER TO MSG DATA TABLE 
031542 012137 002422 3$: MOV (R1)+, TXWORD :GET CHAR TO BE LOADED 
1657 031546 004737 005146 JSR PC,LDTXSI LOAD CHAR INTO TX SILO 
1658 031552 020127 003242 CMP R1,4MSG1+18. >SEE IF ALL MSG CHARS LOADED YET 
1659 031556 103771 BLO 3$ 7BR IF NOT YET 
0315 004737 005120 JSR PC ,WAITSO sALLOW DATA TO RIPPLE IN SILO 
1661 031564 004737 005226 JSR PC,STPLU CLOCK LU FOR 7 CYCLES (UNTIL FIRST 
1662 031570 50. DATA CHAR IS ABOUT TO BE RECEIVED) 
1663 031572 004737 006666 JSR PC, IACTIV :CHK IACT = 0 
1664 031576 0 
1665 031600 004737 007054 JSR PC,.RSEOM CHK RSOM = 0, REOM = 0 
1666 031604 0 
1667 031606 004737 005226 JSR PC,STPLU ;CLOCK LU UNTIL 1ST DATA CHAR IS RCV'D 
1668 031612 6 
1669 031614 012701 003224 MOV 4#MSG1+4,R1 
031620 020127 003224 5$: CMP R1,AMSG1+4 ;SEE IF 1ST CHAR RCV'D 
1671 031624 001007 BNE BR IF NO 
1672 031626 004737 006666 JSR PC, IACTIV CHK IACT = 
1673 031632 1 1 
1674 031634 004737 007054 JSR PC,RSEOM ;CHK RSOM = 1, REOM = 0 
1675 031640 1 1 
1676 031642 20 BR 9$ 
1677 031644 020127 003234 6$: CMP R1,4MSG1+12. SEE IF LAST CHAR RCV'D 
1678 031650 001007 BNE 8$ ;BR IF NO 
° ase 2 004737 006666 = PC, IACTIV CHK FOR IACT = 0 
1681 0351660 004737 007054 JSR PC,RSEOM ;CHK RSOM = 0, REOM = 0 
1 031664 0 
1683 031666 0004 BR 9$ 
1684 031670 004737 006666 8$: JSR PC, IACTIV CHK FOR JACT = 1 
1685 031674 1 
1686 031676 004737 007054 JSR PC,RSEOM CHK RSOM = 0, REOM = 0 
1687 031702 0 
1 031 737 004076 9$: JSR PC ,READAX ;READ AxO 
1689 031710 023721 002370 CMP RAX15,(R1)+ : COMPARE RCV'D ——. TO EXPECTED 
1690 031714 001415 BEQ 12 ;BR_IF RCV'D DATA Ok 
1691 031716 016137 177776 002404 MOV -2(R1),GOODAT ;GET EXPECTED DATA 
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1692 031724 002370 002406 MOV RAX15 "> y ppee GET ACTUAL DATA 
Hs £4 031732 004500 JSR PC ,GETALL :GET REGS FOR PRINTOUT 


; REPORT INCORRECT BATA CHAR _RCV'D 
ERRDF  26,EM26,ERR3 


BR 24$ 
005226 : : PC,STPLU CLOCK LU 8 CYCLES 
003236 : R1,4MSG1+14, cant? NOT a CHARS CHECKED YET 
006666 4 PC, IACTIV CHK IACT = 
007054 4 PC ,.RSEOM CHK RSOM = 0, REOM = 0 
000200 002366 #1C,WRIBYT 
003722 PC ,WRITLU SET IC (INPUT CLEAR) IN REG 12 
006666 4 PC,IACTIV ;CHK IACT = 0 
003576 243: SR PC,MSTCLR ; ISSUE CLEAN-UP MASTER CLEAR 


ENDTST 
L10063: 
032024 TRAP 


WEAR ASARASASASAASASLALAARRRAE RESALE RERRAARRRSRRRRRRAR RR RAR ARRAS RRA R RRA RRR S RRR DSS DS 


» SBTTL TEST 32 = USYRT RECEIVER MSG TEST ~ CHAR MODE, NO CRC 


te THE LINE UNIT IS INITIALIZED AND A MESSAGE IS INITIATED (USING et ta WITH 
3* LULP (REG 12) SET TO LOOP THE DATA _INTERNALLY IN THE USYRT, AND WITH NO 
;* ERROR DETECTION. TWO SYNCHS, 000, ig 25 Fr 377,000, AND TWO SY 


1 
2 
3 
4 
5 
6 
7 
8 
9 
0 


NCHS ARE 
:* THEN SENT. THE PROGRAM MONITORS IACT. AND THE RECEIVED CHARS ARE READ FROM 
:* AXO-15 AND COMPARED TO EXPECTED VALUES” THE PROGRAM THEN CHECKS FOR IACT 
;* STILL = 0, SETS IC TO CLEAR THE RECEIVER, AND CHECKS FOR IACT = 
PTT TITITITILI TELE T LETTE TCL LEE EEE LE LEE LLL 


BoNTST 132: 
032270 #24$ ,RETADR SET TEST EXIT Py es FOR ERRORS 
003576 PC.MSTCLR ; ISSUE MASTER CLEAR 
010612 PC,SETUP [PROGRAM THE USYRT 


SYNCH 
i CRC1! STRIP! JERR! DDCMP 


On~ OUSWRA— 
ooo 


#12,REGNUM ;SET LU REG NO. = 12 
AXNUM ;SET AX BYTE NO. = 0 FOR AXO 
See 


SET LULP_IN REG 12 
;GET POINTER TO MSG DATA TABLE 
:GET CHAR TO BE mate 

LOAD CHAR INTC TX SILO 
R1.4MSG1+18. ‘SEE IF ALL MSG CHARS LOADED YET 
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C, 
TEST 32 = USYRT RECEIVER MSG TEST = CHAR MODE, NO CRC 1 
1742 032120 103771 BLO 3$ ;BR IF NOT YET 
1743 032122 004737 005120 JSR PC ,WwAITSO ;ALLOW DATA TO RIPPLE IN SILO 
1744 032126 004737 005226 JSR PC,STPLU CLOCK LU FOR 24 CYCLES (UNTIL FIRST 
1745 032132 000030 24. DATA CHAR IS ABOUT TO BE RECEIVED) 
1746 032134 004737 006666 JSR PC, IACTIV [CHK IACT = 0 
1747 032140 000000 0 
1748 032142 004737 005226 JSR PC, STPLU ;CLOCK LU UNTIL 1ST DATA CHAR IS RCV'D 
1749 032146 000006 6 
1750 032150 012701 003224 MOV #M™SG1+4,R1 
1751 032154 004737 006666 10$: JSR PC, IACTIV CHK IACT = 1 
1752 0321 00000 | 1 
1753 032162 004737 004076 JSR PC ,READAX sREAD AXO 
1754 032166 023721 002370 CMP RAX15,(R1)+ ; COMPARE RCV'D CHAR TO EXPECTED 
1755 032172 001415 BEQ 12$ 3;BR_IF RCV'D DATA OK 
1756 032174 016137 177776 002404 MOV -2(R1),GOODAT  ;GET EXPECTED DATA 
1757 032202 013737 002370 002406 MOV RAX15 ,BADDAT GET ACTUAL DATA ° 
1758 032210 004737 004500 JSR PC ,GETALL ;GET REGS FOR PRINTOUT 
1759 ;REPORT INCORRECT DATA CHAR RCV'D 
1760 032214 ERRDF 26,EM26,ERR3 
032214 104455 TRAP CSERDF 
032216 000032 «WORD 2 
032220 013043 «WORD EM26 
2222 015114 «WORD ERR3 
1761 032224 000421 BR 24$ 
762 032226 004737 005226 12$: JSR PC,STPLU ;CLOCK LU 8 CYCLES 
1763 032232 10 8. 
032234 020127 003236 CMP R1,AMSG1+14. SEE IF ALL * a CHARS RCV'D YET 
1765 032240 103745 BLO 10$ :BR IF NOT Y 
1766 03224? 004737 006666 JSR PC, IACTIV CHK FOR TACT "Sri = 1 
1767 032246 000001 1 
68 032250 012737 000200 002366 MOV #1C ,WRIBYT 
1769 032256 004737 003722 JSR PC,WRITLU SET IC (INPUT CLEAR) IN REG 12 
1770 032262 004737 006666 JSR PC, JACTIV CHK IACT = 0 
1771 032266 000000 0 
1772 032270 004737 003576 24$: JSR PC,MSTCLR ; ISSUE CLEAN-UP MASTER CLEAR 
1773 032274 ENDTST 
032274 L 10064: 
032274 104401 TRAP CSETST 
1774 
1775 
1776 
1777 
1778 
1779 F Mii SeeteA ASR RR BRR SSERSSSSESSRSARERARRSRRAARSRRRRRARRRRRRRARAS RRA RRR RR RR RAD S DO | 
fo » SBTTL TEST 33 - USYRT RECEIVER MSG TEST - BIT MODE, NO CRC 
1782 :* THE LINE UNIT IS INITIALIZED AND A MESSAGE IS INITIATED (USING STEPLU) WITH 
1783 ;* LULP (REG 12) SET TO LOOP THE DATA INTERNALLY IN THE USYRT, AND WITH ERROR 
1784 :* DETECTION INHIBITED. TWO FLAGS, 000,125,252,377,000, AND TWO yw FLAGS 
1785 * ARE THEN SENT. THE PROGRAM MONITORS IACT, RSOM, AND THE RCV'D CHARS AR 
1786 ;* READ FROM AXO-15 AND COMPARED TO EXPECTED VALUES. THE PROGRAM THEN CHECKS FOR 
1787 3* IACT = 0, SETS IC TO CLEAR THE RECEIVER, AND CHECKS FOR IACT STILL = 0. 
1788 <2 LARBRSSSALSZSLZALSZASASESSSRSESESE RAR RRR RERR ARR RRR RR RRS ARR RAR RRR R RRR R EARS RRR ARRAS SD I 
1789 032276 BGNTST 
032276 133:: 
1790 032276 012737 Ose 002362 MOV #24$,RETADR 
1791 032304 004737 00357 JSR PC,MSTCLR ; ISSUE MASTER CLEAR 
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RT RECEIVER MSG TEST = BIT MODE 


010612 


000012 
00240 


46 
003242 


005120 
005226 


006666 
007054 
005226 


003224 
003224 


006666 
007054 


003234 
006666 
007054 


006666 
007054 


004076 
002370 


177776 


002370 
004500 


005226 
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002400 
002366 


3$: 


5$: 


6$: 


8$: 


9$: 


002404 
002406 


; REPORT 


12$: 


JSR PC, SETUP 
000 
CRC2!CRC1!IERR 
000 
000 
MOV #12,REGNUM 
CLR AXNUM 
MOVB  #LULP,WRIBYT 
JSR »WRITLU 
MOV #45G1,R1 
MOV (R1)+. TXWORD 
JSR PC,LDTXS1 
CMP R1,4MSG1+18. 
BLO 3$ 
JSR PC ,WAITSO 
JSR PC, STPLU 
sk PC, IACTIV 
JSR PC,RSEOM 
JSR PC, STPLU 
MOV #MSG1+4,R1 
CMP R1,AMSG1+4 
BNE 6$ 
JSR PC, IACTIV 
JSR PC .RSEOM 
BR 9$ 
CMP R1,4MSG1+12. 
BNE $ 
JSR PC, IACTIV 
JSR PC,RSEOM 
BR 9$ 
SR PC, IJACTIV 
JSR PC,RSEOM 
JSR PC ,READAX 
CMP RAX15, (R1)+ 
BEQ 12$ 
MOV -2(R1),GOODAT 
MOV RAX15 ,BADDAT 
JSR PC, GETALL 
INCORRECT DATA CHAR RCV'E 
ERRDF  26,£M26,ERR3 
BR 24$ 

PC, STPLU 


JSR 
8. 


;PROGRAM THE USYRT 


2 
:GET POINTER TO MSG DATA TABLE 
; GE OADED 


SCHK IACT = 0 
CHK RSOM = 0, REOM = 0 
;CLOCK LU UNTIL 1ST DATA CHAR IS RCV'D 


:CHK RSOM = 1, 


;SEE IF LAST CHAR RCV'D 
;BR IF NO 
CHK FOR IACT = 0 


;CHK RSOM = 0, REOM = 0 
CHK FOR IACT = 1 

CHK RSOM = 0, REOM = 0 
ZREAD Ax0 


sCLOCK LU @ CYCLES 


SET LU REG NO. = 12 
;SET AX BYTE NO. = 0 FOR AXO 


SET LULP_IN REG 1 


T CHAR TO BE L 
;LOAD CHAR INTO TX SILO 
7SEE IF ALL MSG CHARS LOADED YET 
:BR IF NOT YET 


;ALLOW DATA TO_RIPPLE IN SILO 
;CLOCK LU FOR 33 CYCLES (UNTIL FIRST 
DATA CHAR IS ABOUT TO BE RECEIVED) 


;SEE IF 1ST CHAR RCV'D 
BR IF NO 

;CHK IACT = 1 

REOM = 0 


; COMPARE RCV" D CHAR TO EXPECTED 
BR IF RCV'D DATA Ok 

GET EXPECTED —— 

:GET ACTUAL DATA 

=GET REGS FOR PRINTOUT 





33° 


0 
032742 
032746 
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003236 
006666 
007054 
000200 
003722 
006666 


003576 


003576 
000014 
000040 
003722 
000040 
000125 
005146 
000002 
004076 
002370 


000000 
002370 
004500 


002426 
003576 
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002366 


002400 
002366 


002426 
002422 


002402 
000000 
002404 
002406 


CMP R1,4MSG1+14, i SEE IF ALL DATA CHARS CHECKED YET 
5$ IF NOT YET 


PC,JACTIV + CHK IACT = 0 
‘ PC ,RSEOM ;CHK RSOM = 0, REOM = 0 
MOV #IC ,WRIBYT 
JSR PC ,WRITLU 3SET IC CINPUT CLEAR) IN REG 12 
= PC,IACTIV ;CHK IACT = 0 
24%: JSR PC,MSTCLR ; ISSUE CLEAN-UP MASTER CLEAR 
ENDTST 
L10065: 
TRAP CSETST 
PRB RBRARSRRSBASASASASSERSERSERARRRRRRRRRRRRRRRRRRRRRRRRRRRSRRRR RRR SARS RR RRS RR RRR ASS S| 
-SBTTL TEST 34 = SILO-DISABLED TRANSMITTER LOAD TEST 


- THIS TEST DISABLES THE SILOS, LOADS A 125 CHARACTER INTO THE TX SILO, AND 
i* i BUFFER. -15 AND CHECKS THAT THE DATA DiD NOT GET LOADED INTO THE USVRT TX 
-* 


1T34:: 
JSR PC,MSTCLR 


#14,,REGNUM 
MOV #D1SSI,WRIBYT 
JSR PC ,WRITLU 
MOV #Diss1 DISILO 
MOV #125, TXWORD 
JSR PC,LDTXS! 


; ISSUE MASTER CLEAR 
7SET REG NO. = 14 

SET DISSI iT 

SET DISABLE SILO FLAG 
;LOAD 125 INTO TX SILO 


MOV #2 ,AXNUM ;SET REG NO. ee AX1 
JSR PC ,READAX SREAD AX1-15, AX1-16 
ay gill -4000 : CHECK FOR wAxi=15 UNC HANGE D 


MOV #000, GOODAT 

MOV RAX15 RBADDAT 

JSR PC,GETALL 
;REPORT REG MISCOMPARE 

ERRDF 3,£M3,ERR3 


BR IF UNCHANGED 

GET EXPECTED DATA 
;GET ACTUAL DATA 

GFT REGS FOR PRINTOUT 


TRAP ie 


- WORD 
-WORD EM3 
-WORD ERR3 
3$: CLR DISILO ;CLEAR DISABLE SILO FLAG 
— JSR PC,MSTCLR ; ISSUE MASTER CLEAR TO CLEAN UP 


L 10066: 
TRAP CSETST 


zo 
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TEST 34 = SILO=DISABLED TRANSMITTER LOAD TES 
1893 
1894 TAR RRRRBEBABASRABRRASRSERESARARERESERE RARER R RRR RR RRR RRRRRR RRR RRR RRR RRR REE RRR RRR RRR RES SD 
Mb 24) * SBTTL TEST 35 = SILO=DISABLED MESSAGE TEST - BIT MODE, NO CRC 
** 
1897 ;* THE LINE UNIT IS INITIALIZED AND A MESSAGE IS INITIATED (USING STEPLU) 
1898 :* WITH LULP (REG 12) SET TO LOOP THE DATA INTERNALLY IN THE USYRT, WITH SILO 
1899 ;* DISABLE SET, AND WITH NO ERROR DETECTION. TWO FLAGS, rire 125, 252, AND 
1900 3* TERMINATING FLAGS ARE THEN SENT BY LOADING THE on TTED CHARS INTO 
1901 ;* REG AX1. THE PROGRAM MONITORS OACT, IACT, RSOM, REOM, ORDY, OCOR, ICIR, 
Ie i* IRDY » AND THE RECEIVED CHARS ARE READ FROM AXO AND COMPARED TO EXPECTED 
4 *® 
1904 F +e saan anitinadeibaeecuadabeiupiaeendenainiinkanandnehennusionneiadsninonsinnetions 
1905 faa BGNTST 135 
1906 032770 012737 033670 002362 MOV #1 8$,RETADR SET TEST EXIT ADDRESS FOR ERRORS 
1907 Behons 004737 005512 PC, INITRN sF IND OUT WHICH USYRT CHIP 
03 0 
1910 033006 0604737 003576 JSR PC,MSTCLR ISSUE MASTER CLEAR 
1911 033012 004737 010612 JSR PC, SETUP :PROGRAM THE USYRT 
1912 033016 000 
1913 033020 000302 CRC2!CRC1!IERR 
1914 033022 000 
1915 033024 000 ‘’ 
1916 0330. 012737 000014 002400 MOV #14 ,REGNUM SET REG NO. = 14 
1917 033034 012737 000140 002366 MOV #TXEN'DISSI,WRIBYT 
1918 033042 004737 003722 JSR PC,WRITLU ;SET TXEN AND DISSI IN REG 14 
919 033046 012737 000140 002426 MOV WTXEN'DISSI. DISILO ;SET DISABLE SILO FLAG 
1920 033054 012737 000012 002400 MOV #12,REGNUM -SET LU REG NO. = 12 
1921 033062 112737 000040 002366 MOVB #LULP, WRIBYT 
1922 033070 737 003722 JSR PC ,WRITLU :SET LULP IN REG 12 
1923 033074 012701 003220 MOV #MSG1,R1 GET POINTER TO MSG 
1924 033100 004737 63: JSR PC,OSIRDY CHK ORDY = 1 
1925 033104 000001 1 
926 0331 012737 002402 MOV #2, AXNUM ;SET AX BYTE NO. FOR AX] 
1927 033114 112137 002374 MOVB (R1)+,WAX15 :GET A CHAR 
1928 033120 112137 002376 MOVB (R1)+,WAX16 
1929 033124 004737 004264 JSR PC ,WRI TAX ;LOAD CHAR INTO USYRT TX BUFFER 
1930 033130 004737 004634 JSR PC,OSIRDY :CHK ORDY = 0 
1931 033134 0 
1932 033136 004737 005324 JSR PC,OACTIV 7CHK OACT = 0 
1933 033142 0 
1934 033144 004737 005226 JSR PC,STPLU sCLOCK LU FOR 3 CYCLES 
1935 033150 3 
936 033152 004737 005324 JSR PC,OACTIV :CHK OACT = 1 
1937 033156 1 1 
1938 033160 012703 MOV #4 ,R3 INIT COUNTER 
1939 033164 112137 002374 4$: MOVB (R1)+,WAX15 :GET ANOTHER CHAR 
1940 033170 112137 002376 MOVB (R1)4+,WAX16 
1941 033174 020327 CMP R3,41 : SEE IF LOADING LAST DATA CHAR YET 
1942 033200 001 BNE 5$ F NOT 
1943 033202 005737 002430 TST CHPT YP “SEE IF SIG USYRT 
1944 033206 001403 BEQ 5$ [BR IF YES 
1945 033210 112737 02 002376 MOVB #TEOM, WAX16 :SET TEOM wit" LAST DATA CHAR 
1946 033216 737 004634 JSR PC,OSIRDY sCHK ORDY = 1 
1947 033222 1 1 
1948 033224 004737 004264 JSR PC ,WRITAX :LOAD ANOTHER CHAR INTO USYRT Tx BUFFER 





CZDMRB M8203 STATI 
TEST 35 = SILO=D1SABL 


1949 033230 


1987 033430 

1988 

1989 033434 
033434 


2000 033502 
2001 033504 


CD 


NO OMe 


AG #1 
D MESSAGE TEST = BIT MODE, NO C 


004634 
006666 
007054 
005226 
005324 
004634 


006402 
002430 
002374 
000002 
004264 
005226 
006402 
005324 
006666 
007054 


006402 
000000 
002370 


000000 
002370 
004500 


005226 
006402 
005324 
006666 
007054 
006402 
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JSR PC,OSIRDY 


0 

JSR PC,IACTIV 

sk PC ,RSEOM 

JSR PC,STPLU 

SR PC,OACTIV 

JSR PC .OSIRDY 

DEC R3 

BNE 4$ 

sk PC, ISIRDY 

TST CHPTYP 

BNE 11$ 

CLRB —- WAX15 

002376 MOVB = #TEOM,, WAX16 

JSR PC ,WRITAX 
11$: J8R PC.STPLU 

JSR PC, ISIRDY 

SR PC,OACTIV 

SR PC, IACTIV 


- PC,RSEOM 
‘. PC, ISIRDY 


002402 MOV #0 ,AXNUM 

000000 CMPB RAX15 ,4000 
BEQ 9$ 

002404 MOV #0, GOODAT 

002406 6$: MOV #RAX15 ,BADDAT 


JSR -GETA 
REPORT INCORRE( T DATA CHAR RCV'D 
ERRDF 26,EM26,ERR3 


9$: JSR Pe STPLU 
eR PC, ISIRDY 
isp PC,OACTIV 
JSR PC, IACTIV 
JSR PC ,RSEOM 
sR PC, ISIRDY 


; CHK ORDY 
3CHK JACT 
3 CHK RSOM 
:CLOCK LU 


CHK OACT 


CHK ORDY 

es COUNT 
BR IF NOT 

>CHK IRDY 


sSEE IF Si 
;BR IF NOT 


;LOAD EOM 


= 0 

= 0 

= 0, REOM = 0 
FOR 8 CYCLES 
= 1 

ay 

ER 

DONE YET 


G USYRT 


CHAR 


;LOAD ANOTHER CHAR INTO USYRT TX BUFFER 


CLOCK LU 
CHK IRDY 
CHK OACT 
i; CHK [ACT 
;CHK RSOM 
CHK IRDY 
;SET AX BY 
: COMPARE R 


;BR_IF MAT 
SET EXPEC 


FOR 3 CYCLES 

= 1 

= 1 

= 1 

= 1, REOM = 0 

= 0 

TE NO. FOR AxO 
CV'D CHAR TO 000 


CH 
TED DATA 


;SET ACTUAL DATA 


;GET REGS 


sCLOCK LU 
;CHK IRDY 


CHK OACT 


CHK IACT 


; CHK RSOM 
sCHK IRDY = 





FOR PRINTOUT 
TRAP 
- WORD 
- WORD 
- WORD 

FOR 8 CYCLES 

=] 

= 1 

= 1 

= 1, REOM = 0 

= 0 “ 


CSERDF 
26 


EM26 
ERR3 
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TEST 35 = SILO=DISABLED MESSAGE TEST = BIT MODE, NO C 












CF RATAAAARAARAAERERARAREARAREAEARRERAAREARARAAERAAAAAAAARAARARAAAAAAAAAEARREAAARARH HERES 


- SBITL TEST 36 - RECEIVER BUFFER TEST = CHAR MODE, CRC 


FIRST, A MASTER CLEAR IS DONE AND THE PROGRAM CHECKS FOR ICIR = 1 - IRDY 

0. THEN, 2 SOM CHARS ARE LOADED AND CLOCKED INTO THE USYRT, AND 6 
BYTES OF A 256-BYTE BINARY COUNT DATA PATTERN (000-377) ARE LOADED INTO 

L 

THE LINE UNIT IS THEN CLOCKED UNTIL _IRDY = 1, AND THE PROGRAM CHECKS FOR 
THIS TO OCCUR WITHIN 40-43 CYCLES. THE PROGRAM READS THE RCV SILO, CHECKS THE 
CHAR FOR 000, AND CHECKS FOR IRDY = 0 AGA 
THE LINE UNIT IS THEN CLOCKED IN a thy OF Nj CYCLES, AND AFTER EACH, THE 
PROGRAM CHECKS FOR ICIR = 1, IRDY = 1, UNTIL THE 64fH GROUP, AFTER WHICH 
IT CHECKS FOR ICIR = 0, IRDY = 1, THE SECOND DATA CHAR IS READ FROM THE 
‘ieee? my AND COMPARED TO 001. THEN, THE PROGRAM CHECKS FOR ICIR = 1, 
THE REST OF THE BINARY COUNT DATA BYTES ARE CYCLED 8 CLOCKS AND READ AND 
COMPARED A BYTE AT A TIME. 


2002 933510 000000 0 
2003 033512 123727 002370 000125 CMPB RAX15 4125 ;COMPARE 2ND RCV'D CHAR TO 125 
2004 033520 001404 BEQ 12$ “BR IF MATCH 
2005 033522 012737 000125 002404 MOV #125,GOODAT ;SET EXPECTED DATA 
2006 033530 000734 BR 6$ :BR TO ep el ERROR 
2007 033532 004737 005226 12$: JSR PC,STPLU ;CLOCK LU FOR 8 CYCLES 
2008 033536 000010 8. 
009 033540 004737 006402 JSR PC, ISIRDY ;CHK IRDY = 1 
2010 033544 000002 2 
2011 033546 004737 005324 JSR PC ,OACTIV :CHK OACT = 1 
2012 033552 000001 1 
2013 033 004737 006666 JSR PC, IACTIV 7CHK IACT = 0 
2014 0335 000000 0 
2015 033562 004737 007054 JSR PC,RSEOM ;CHK RSOM = 0, REOM = 1 
2016 033566 000002 2 
2017 033570 004737 006402 JSR PC, ISIRDY ;CHK IRDY = 
2018 033574 000000 0 
2019 033576 123727 002370 000252 (MPR RAX15,4252 Sige * ae RCV'D CHAR TO 252 
2020 033604 001404 BEC 14$ “BR IF 
2021 033606 012737 000252 002404 MOV 5. GOODAT 3 SET EXPECTED DATA 
2022 033614 000702 BR =BR TO REPORT ERROR 
2023 033616 012737 000014 002400 14$: MOV Hen REGNUM ;SET REG NO. = 14 
2024 033624 012737 000040 002366 MOV #015S1,wRIBYT 
2025 033632 004737 003722 JSR PC ,WRITLU sCLEAR TX ENABLE 
~ 2026 033636 012737 000011 002400 MOV #11,REGNUM ;SET REG NO. = 11 
2027 033644 012737 000200 002366 MOV #OC ,WRIBYT 
2028 033652 004737 003722 JSR PC,WRITLU :SET OC TO SHUT DOWN TRANSMITTER 
2029 033656 004737 005120 JSR PC,WwAITSO ;WAIT FOR SHUTDOWN 
2030 033662 004737 005324 JSR PC,OACTIV ;CHK FOR OACT = 0 
2031 033666 000000 0 
2032 033670 005037 002426 18$: CLR DISILO ;CLEAR DISABLE SILO FLAG 
2033 033674 004737 003576 JSR PC,MSTCLR ; ISSUE MASTER CLEAR TO CLEAN UP 
2034 033700 ENDTST 
033700 L10067: 
104401 TRAP (SETST 


e. ee . . . 
eoeaeeeneteeee#eetineneeeneneese 
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TEST 36 = RECEIVER BUFFER TEST = CHAR MODE, §' 
2057 Fg TAMA AAAAAAAAREAAARAAERAHARARAARAAHAAARAHARARAAAHRERAARARARRRARAAERAARERHERRAHAREADS ; R‘ 
2058 033702 BGNTST R 

033702 136:: Ri 

ee 033702 012737 034156 002362 MOV #A10,RETADR ;SET TEST EXIT ADDRESS FOR ERRORS RI 
Fiore tees eaten enetebeeteneinemeneteemenemeenaneetemateneneateetetetaeteetamenaneieneteeeenanateteteetetataaetataenaated R! 

2061 DO MASTER CLR, CHK FOR ICIR , IRDY = 0 R! 

2062 Fate ame ata enna aac naa ania R) 

2063 033710 004737 003576 JSR PC.MSTCLR : ISSUE MASTER CLEAR R! 

2064 033714 004737 006402 JSR PC, ISIRDY :CHK ICIR = 1, IRDY = 0 R! 

2065 033720 000001 1 R 

2067 > LOAD AND CLOCK 2 SOM'S, LOAD 64 BYTES OF BINARY COUNT PATTERN INTO TX SILO, R’ 

Soop ; CLOCK LINE UNIT, CHK FOR IRDY = 1 WITHIN 40-43 CYCLES R! 
a al ri eas IRENE Sa le IE ETI Rel IEE NEM aE Bt a R 

2070 033722 004737 005512 JSR PC, INITRN ;LOAD 2 SOM'S, CLOCK THEM INTO USYRT R: 

2071 033726 000226 SYNCH R: 

2072 033730 000011 STRIP! DDCMP R: 

2073 033732 005003 CLR R3 : INIT BINARY COUNT DATA FOR WRITING R: 

2074 033734 010337 002422 23: MOV R3, TXWORD R' 

2075 033740 004737 005146 JSR PC, LDTXS] ;LOAD A — BYTE INTO TX SILO R' 

2076 033744 905203 INC R3 : INCR DATA R: 

2077 033746 020327 000100 CMP R364, ;SEE IF 64 BYTES LOADED YET R 

2078 033752 002770 BLT 2$ ;BR IF NOT YET S. 

2079 033754 004737 007406 JSR PC ,RCVIST RECEIVE AND TIME FIRST CHARACTER S, 

goeo 033760 000050 40. ; 

g08e READ RCV SILO, COMPARE FIRST CHAR TO 000, CHK FOR ICIR = 1, IRDY = O 

2084 033762 005004 $$: CLR ; INIT PATTERN FOR READING 

2085 033764 004737 007722 JSR PC .CKDATA ;READ RCV SILO, COMPARE DATA 

2086 033770 000000 0 EXPECTED DATA = 000 

2087 033772 000000 0 DON'T CLOCK LINE UNIT 

2088 033774 005204 16$: INC R4 : INCR DATA FOR READING 

2089 033776 004737 006402 JSR PC, ISIRDY 7CHK FOR ICIR = 7, IRDY = 0 

c070 034002 000001 1 

sO ; CLOCK 63 CHARS INTO RCV SILO, CHK ICIR = 1, IRDY = 

2094 034 004737 005226 18s: JSR PC, STPLU sCLOCK LU FOR & CYCLES 

2095 034010 000010 8. 

2096 034012 019337 002422 MOV R3, TXWORD 

2097 034016 004737 005146 JSR PC,LDIXS! LOAD ANOTHER WORD INTO TX SILO 

2098 034022 005203 INC R3 ;INCR PATTERN FOR WRITING 

2099 034024 004737 006402 JSR PC, ISIRDY :CHK ICIR = 1, IRDY = 1 

2100 034030 000003 3 

2101 034032 020327 000177 CMP R3,#127. SEE IF 63 MORE CHARS CLOCKED YET 

2 034036 18$ :BR IF NOT YET 


PC,STPLU ;CLOCK LU FOR 8 CYCLES 
PC, ISIRDY :CHK ICIR = 0, IRDY = 
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TEST 36 = RECEIVER BUFFER TEST = CHAR MODE, CRC 
2113 034054 010437 034064 208: MOV R4,21$ :SET EXPECTED DATA . 
2114 034060 004737 007722 JSR PC, CKDATA ;READ AND COMPARE DAT 
2115 034064 000000 21s: 0 : EXPECTED SILO ec Goes HE RE 
2116 034066 000000 0 T CLOCK LINE UN 
2117 034070 005204 22%: INC RG ‘TNC DATA PATTERN F OR READS 
2118 034072 020427 000400 CMP R4 4400 i SEE IF ALL DONE READING YET 
2119 034076 001407 BEQ 32$ BR IF DONE READING 
2120 0341 004737 006402 JSR PC, ISIRDY [CHK ICIR = 1, IRDY = 1 
2121 034104 000003 3 
2122 034106 004737 005226 JSR PC, STPLU ;CLOCK LU FOR 8 CYCLES 
2123 034112 000010 8. 
2124 034114 020327 000377 CMP R3,4377 ;SEE IF ALL CHARS LOADED INTO TX SILO YET 
2125 034120 003007 BGT 24$ ;BR IF YES 
2126 034122 010337 002422 MOV R3,TXWORD 
2127 034126 004737 005146 JSR PC,LDTXS!I ;LOAD ANOTHER CHAR INTO TX SILO 
2128 034132 005203 INC R3 ;INCR DATA PATTERN FOR WRITING 
2129 034134 000137 034054 JMP 20$ 
2130 034140 012737 001000 002422 24%: MOV #TXEOM, TXWORD 
2131 034146 004737 005146 JSR PC,LDTXS! ;LOAD EOM INTO TX SILO 
2132 0341 000137 034054 JMP 20$ 
2133 034156 ans 
2134 034156 004737 003576 Al0: JSR PC.MSTCLR ; ISSUE MASTER CLEAR TO CLEAN UP 
2135 034162 END! ST A) 
034162 10070: A 
034162 104401 TRAP CSETST A 
2136 A. 
2137 A 
2138 A 
2139 a 
2140 A 
2141 DL RR RO TTT RIOR RRR RR ER EERE AR RRR TRE EERE EER ER ERE A 
aps . SBTTL TEST 37 - RECEIVER CHAR LENGTH TIMING TEST = CHAR MODE, NO CRC : 
2144 ;* THE LINE UNIT IS PLACED IN CHAR MODE, WITH NO ERROR DETECTION, AND A MSG IS A 
2145 3* INITIATED WITH 2 SYNCH CHARS. NEXT, FIFTEEN 000 CHARS ARE LOADED INTO THE 
2146 ;* TRANSMITTER SILO. THE LINE UNIT IS THEN CLOCKED USING STEPLU WITH LULOOP 
2147 7* SET, WHILE THE RECEIVER CHAR LENGTH IS SET TO THE FOLLOWING VALUES : 5,6,7,8. 
2148 ;* FOR EACH RCV CHAR LENGTH, THE PROGRAM CHECKS TO MAKE SURE THET USYRT RECEIVER 
2149 ;* FLAGS OCCUR THE PROPER NO. OF CYCLES APART, FOR EACH RCV CHAR LENGTH. 
2150 3* (FOR EXAMPLE A 5-BIT CHAR TAKES 5 CLOCK CYCLES TO BE RECEIVED). A MASTER 
2151 ;* CLEAR IS THEN DONE TC TERMINATE THE OPERATION. 
2152 SLI REE REREE RR E RR ERAEREEE REE ERR AERA REE RRR ERRe & 
2153 034164 BGNTST B 
034164 . 137:: B 
2154 034164 012737 034356 002362 MOV #24$,RETADR ;SET TEST EXIT ADRS FOR ERRORS 
2155 034172 004737 005512 JSR PC, INITRN ;DO MASTER CLR, LOAD 2 SOM'S 
2156 034176 000000 000 B 
2157 034200 000341 CRC2!CRC1! IDLE! DDCMP B 
2158 034202 012701 000017 MOV #15. ,R1 ; INIT COUNTER B 
2159 034206 005037 002422 CLR TXWORD B 
2160 034212 004737 005146 3$: JSR PC,LDTXS] ;LOAD A 000 CHAR INTO TX SILO 8 
2161 034216 005301 DEC R1 ;DECR COUNTER 8 
2162 034220 001374 BNE 3$ ;BR_IF NOT DONE LOADING YET B 
2163 034222 004737 005120 JSR PC ,WAITS5O ;WAIT FOR SILO TO RIPPLE B 
2164 034226 012737 000006 002402 MOV #6, AXNUM 2 SET BYTE _. = 6 FOR Ax3 B 
2165 034234 012737 000009 002374 MOV #000, WAX15 SET DATA FOR AX3-15 = 0 8 
2166 034242 012737 000005 002376 MOV PRXLEND: RXLENO, wAxi6 SET RCV LEN = 5 8 
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TEST 37 = RECEIVER CHAR LENGTH TIMING TEST = CHAR MODE, NO C 









2167 034250 004737 004264 JSR PC WRI TAX ;LOAD Ax3 
2168 034254 004737 005226 JSR PC,STPLU ;CLK LU UNTIL TX'ING 1ST DATA CHAR 
2169 034260 100012 CHPCHK! 10. 8 
2170 034262 012737 000006 002376 MOV gr ty pee WAX16 ;SET RCV LEN = 6 B 
2171 034270 004737 004264 JSR PC ,WRITA SLOAD™ Ax3 8B 
2172 034274 004737 007406 JSR PC, RCVIST ;CLOCK 5-BIT DATA CHAR B 
2173 034300 000005 5 6 
2174 034302 012737 000007 0023576 MOV pe 7) pean eo WAX16é ;SET RCV LEN = B 
2175 034310 004737 004264 JSR PC,WRITA ;LOAD Ax3 B 
2176 034314 004737 011046 JSR rl RXCHAR sRCV s-BIT DATA CHAR, CLK 6-BIT 
2177 034320 000006 6 8 
2178 034322 012737 000000 002376 MOV #0,WAX16 7SET RCV_LEN = 8 
2179 034330 004737 004264 JSR PC ,WRI TAX ;LOAD AXx3 B 
2180 034334 004737 011046 JSR PC,RXCHAR RCV 6-BIT DATA CHAR, CLK 7-8I1T 
2181 034340 7 7 8B 
2182 034342 004737 011046 JSR PC,RXCHAR sRCV 7-BIT DATA CHAR, CLK 8-BIT 
2183 034346 000010 8. B 
2184 034350 004737 011046 JSR PC,RXCHAR :RCV 8-BIT DATA CHAR 
2185 034354 000010 8. 8B 
2186 034356 004737 003576 2438: JSR PC,MSTCLR ; ISSUE MASTER CLEAR TO CLEAN UP 
2187 034362 ENDTST 8 
034362 L10071: B 
034362 104401 TRAP CSETST Bi 
2188 Bi 
2189 B 
2190 
2191 B 
2192 B 
2193 FP EAA AAAAAAAAAAAEAAARAARARARARRAAAAERARARAERARARRAAAAERARRAREAARARAEAAAAEEAAAARARAHRAA ED “aq 
S198 . SBITL TEST 38 - RECEIVER CHAR LENGTH TIMING TEST - BIT MODE, NO CRC C! 
7« C: 
2196 * THE LINE UNIT IS PLACED IN BIT MODE WITH NO ERROR DETECTION, AND A MESSAGE IS C 
2197 * INITIATED WITH 2 FLAG CHARS. NEXT, FIFTEEN 000 CHARS ARE LOADED INTO THE C 
2198 * TRANSMITTER SILO. THE LINE UNIT IS THEN CLOCKED USING STEPLU WITH LULOOP C 
2199 3* SET, WHILE THE RCV CHAR LENGTH IS SET TO THE FOLLOWING VALUES : 8,8,8.7.6.5. C 
2200 te 4,3,2.1. FOR EACH RCV CHAR LENGTH, THE PROGRAM CHECKS TO MAKE SURE THAT THE Cc 
2201 7 USYRT RECEIVER FLAGS OCCUR THE FROPER NO. OF CYCLES APART, FOR EACH RCV . 
2202 ;* CHAR LENGTH. (FOR EXAMPLE, A 5 BIT CHAR TAKES 5 Sere CYCLES TO BE RECEIVED). . 
2203 >* A MASTER CLEAR IS THEN DONE TO TERMINATE THE OPERATION. a 
2204 FFARR AERA AERA EARERREREREREAEEAAEARERAREAEEAEERREERAEEE ERR ARER EERE C' 
2205 Oeetee BGNTST 138 Cc 
z3 C 
2206 034364 012737 034656 002362 MOV #24$,RETADR SET TEST EXIT ADRS FOR ERRORS . 
2207 934372 004737 005512 JSR PC, INITRN :DO MASTER CLR, LOAD 2 SOM'S C 
2208 034376 000000 000 C 
2209 034400 000300 CRC2!CRC1 
2210 034402 012701 000017 MOV #15.,R1 ; INIT COUNTER 
2211 034406 005037 002422 CLR TXWORD 
2212 034412 0064737 005146 3$: JSR PC .LDTXSI :LOAD A 000 CHAR INTO TX SILO 
2213 034416 005301 DEC R1 SDECR COUNTER 
2214 034420 001374 BNE 3$ ;BR IF NOT DONE LOADING YET 
2215 034422 004727 005120 JSR PC,WAITSO sWAIT FOR SILO TO RIPPLE 
2216 034426 012737 000006 002402 MOV #6, AXNUM ;SET BYTE NO. = 6 FOR Ax3 
2217 034434 012737 000000 002374 MOV #000, WAX15 7SET DATA FOR AX3-15 = 0 
2218 034442 004737 007406 JSR PC, RCVIST :CLUCK FIRST 8-BIT DATA CHAR 
2219 034446 000040 32 


2220 034450 012737 000000 002376 MOV #0, WAX16 :SET RCV LEN = 8 
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TEST 38 = RECEIVER CHAR LENGTH TIMING TEST = BIT MODE, NO C 


2221 034456 004737 004264 JSR PC ,WRI TAX ;LOAD Ax3 
2222 034462 004737 011046 JSR PC ,RXCHAR RCV FIRST 8-BIT DATA CHAR, CLK SECOND 8-BIT 
2223 034466 000010 8. 
2224 034470 012737 000007 002376 MOV MRXLEN2!RXLENT!RXLENO,WAX16 ;SET RCV LEN = 
2225 034476 004737 004264 JSR PC ,WRITAX LOAD AX3 
2226 034502 004737 011046 JSR PC,RXCHAR RCV SECOND 8-BIT DATA CHAR, CLK 3RD 8-BIT 
2227 034506 000010 8. 
2228 034510 012737 000006 002376 MOV ye 1) pee WAX16 ;SET RCV LEN = 6 
2229 034516 004737 004264 JSR PC,WRITA ;LO 
2230 034522 004737 011046 JSR PC, RXCHAR RCV 3A 8-BIT DATA CHAR, CLK 7-BIT 
2231 034526 000007 7 
2232 034530 012737 000005 002376 MOV gre 7, pect WAX16 ;SET RCV LEN = 5 
2233 034536 004737 004264 JSR PC ,WRITAX ;LOAD_A 

34 034542 006737 011046 JSR PC,RXCHAR RCV 2 BIT DATA CHAR, CLK 6-B8I1T 
2235 034546 000006 6 
2236 034550 012737 000004 002376 MOV ARXLEN2 ,WAX16 :SET RCV_LEN = 
2237 034556 004737 004264 JSR PC ,WRITAX LOAD Ax3 

38 034562 0046737 011046 JSR PC,RXCHAR “RCV 6-BIT DATA CHAR, CLK 5-8I1T 
2239 034566 000005 5 
2240 034570 012737 000003 002376 MOV #RXLENT!RXLENO,WAX16 ;SET RCV LEN = 3 
2241 034576 004737 004264 JSR PC ,WRITAX LOAD _AX3 
2242 034602 004737 011046 JSR PC,RXCHAR zRCV 5-BIT DATA CHAR, CLR 4-BIT 
2243 034606 000004 4 
2244 034610 012737 000002 002376 MOV #RXLENT , WAX16 2 SET RCV_LEN = 2 
2245 034616 004737 004264 JSR PC ,WRITAX LOAD Ax3 
2246 034622 004737 011046 JSR PC,RXCHAR ERCV 4-BIT DATA CHAR, CLK 3-BIT 
2247 034626 000003 3 
2248 034630 012737 000001 002376 MOV #RXLENO,WAX16 :SET RCV_LEN = 
2249 034636 004737 004264 JSR PC ,WRITAX LOAD AXx3 
2250 034642 004737 011046 JSR PC,RXCHAR “RCV 3-BIT DATA CHAR, CLK 2-BIT 
2251 034646 000002 2 
2252 034650 004737 011046 JSR PC ,RXCHAR iRCV 2-BIT DATA CHAR, CLK 1-BIT 
2253 034654 000001 1 
2254 034656 004737 903576 248: JSR PC,MSTCLR ; ISSUE MASTER CLEAR TO CLEAN UP 
2255 034662 ENDTST 

034662 110072: 
034662 104401 TRAP CSETST 

2256 
2257 
2258 
444 
2261 DDI IU OE EE ER EE EER AREER ERE E ERE ERE Eee 
S508 » SBTTL TEST 39 - TRANSMITTER UNDERRUN ERROR, IDLE MARKING, CHAR MODE.NO CRC 
2264 je. THE LINE UNIT IS PLACED IN CHAR MODE, AND THE IDLE BIT IS SET. THEN, A 
2265 :* MSG IS INITIATED, A 000 CHAR IS SENT, AND THE TX BUFFER IS NOT SERVICED 
2266 >* IN RESPONSE TO THE USYRT TX BUFFER EMPTY FLAG, WHICH CAUSES A TX UNDERRUN 
2267 ;* ERROR. THEN, THE RECEIVER IS CLOCKED AND CHECKED FOR TWO 377 CHARS TO BE 
2268 >* RECEIVED (LINE MARKING) BEFORE SHUTTING DOWN WITH A MASTER CLEAR. 
2269 LEAR R REAR TEAR AREER RE REARS 
2270 Seeete BGNTST (abe: 
2271 034664 012737 034746 002362 MOV #24$,RETADR :SET TEST EXIT ADDRESS FOR ERRORS 
2272 034672 004737 005512 JSR PC, INITRN MST CLR, LOAD 2 SOM'S 


2273 034676 000226 SYNCH 
2274 034700 000341 CRC2!CRC1! IDLE! DDCMP 
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Test eT 39 ~ TRANSMITTER UNDERRUN ERROR, IDLE MARKING, CHAR MODE, 


2275 034702 012737 000000 002422 MOV #000, TXWORD 
2276 034710 004737 005146 JSR PC,LDTXSI ;LOAD 000 CHAR INTO TX SILO 
2277 034714 004737 005226 JSR PC,STPLU sCLOCK LINE UNIT UNTIL LINE GOES MARKING 
2278 034720 000063 LP 
2279 034722 004737 007326 JSR PC,RDRXSI ;READ 000 CHAR 
2280 034726 004737 007722 JSR PC,CKDATA ;READ AND CHECK FOR MARK CHAR (377) 
2281 034732 000377 377 
2282 034734 000000 000 
2283 034736 004737 007722 JSR PC,CKDATA ;READ AND CHECK FOR ANOTHER MARK CHAR 
228 034742 000377 377 
2285 034744 000000 000 
2286 034746 004737 003576 248: JSR PC,MSTCLR ; ISSUE MASTER CLEAR TO CLEAN UP 
2287 034752 ENDTST 
034752 L10073: 
034752 104401 TRAP CSETST 
2288 
2289 
2290 
2291 
229 
2293 SLA EE REE 
229% “SBTTL TEST 40 - MSG TERMINATION WITH GA CHARS - BIT MODE,NO CRC 
2296 >* THE DEVICE IS ENABLED FOR TRANSMIT AND RECEIVE, AND A MESSAGE IS 
2297 :* INITIATED IN BIT MODE. 
2298 3* 2 FLAG CHARACTERS ARE eB oS ee F 
2299 te THE FOLLOWING DATA CHARACTE : 000, D5, 252, 377, 000. THEN THE LOOP 
2300 :* MODE BIT (STRIP) IS SET AND RS TERMINATING GO-AHEAD CHARACTERS ARE 
2301 :* SENT. EACH USYRT RCV FLAG IS TIMED AS IT IS RECEIVED, AND THE 5 DATA 
2302 :* WORDS ARE READ AND COMPARED TO EXPECTED VALUES. 
2303 ;* ALSO, THE FIRST GA CHAR IS CHECKED BY SCANNING THE TXDATA BIT AS THE GA 
2304 7* IS BEING TRANSMITTED (GA = 376 OCTAL). 
2305 :* THE TEST ALSO CHECKS FOR SETTING OF RAB AND EBLK 
2306 3;* IN LOOP MODE. 
2307 LTA EREE EERE 
2308 034754 BGNTST 
034754 T40:: 
2309 034754 012737 035110 002362 MOV #24$,RETADR sSET TEST EXIT ADRS FOR ERRORS 
2310 034762 004737 005512 JSR PC, INITRN sMST CLR, LOAD 2 SOM'S 
2311 034766 000000 000 
2312 034770 000310 CRC2!CRC1!STRIP 
2313 034772 004737 010770 JSR PC,LODMSG z;LOAD DATA CHARS INTO TX SILO 
2314 034776 003224 MSG1+4 
2315 035000 000005 5 
2316 035002 012737 005000 002422 MOV #TXGOA! TXEOM, TXWORD 
2317 035010 004737 005146 JSR PC, LDTXSI ;LOAD A GA CHAR INTO TX SILO 
2318 035014 004737 005146 JSR PC .LDTXSI ;LOAD ANOTHER GA 
2319 035020 004737 005120 JSR PC,WAITSO TALLOW SILO TO RIPPLE 
2320 035024 004737 005226 JSR PC,STPLU :CLOCK LU UNTIL GA CHAR IS TX" ING 
2321 035030 100071 CHPCHK!57. | 
2322 035032 004737 011150 JSR PC,CKTBIT ;SCAN TXDATA BIT FOR GA CHAR 
2323 035036 000376 376 
2324 035040 004737 007722 JSR PC,CKDATA sRCV 000 CHAR, CLK 125 
2325 035044 000000 000 
2326 035046 000000 0 
2327 035050 004737 007722 JSR PC,CKDATA zRCV 125 CHAR, CLK 252 
2328 035054 000125 125 
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Test eT 20 - MSG TERMINATION WITH GA CHARS = BIT MODE,NO CRC 


2329 035056 
2330 035060 
2331 035064 
2332 035066 
2333 Beene 
2334 


2382 035226 


012737 


007722 


. 


007722 


SR PC,CKDATA 
52 

SR 

77 
8. 


J 
2 
0 
, PC,CKDATA 


007722 PC,CKDATA 


JSR 
3000 


8. 
003576 24$: JSR 
ENDTST 


PC,MSTCLR 


:RCV 000 CHAR, CHK RAB = 1, 


N 13 
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RCV 252 CHAR, CLK 377 


RCV 377 CHAR 


EBLK = 


; ISSUE MASTER CLEAR 


L10074: 


TRAP CSETST 


EERE EAKREKERERAEEEKERAREERREREEKEEEE 


~SBTTL 


INITIATED IN CHAR 


Pj 
. 
° 
. 
@ 
. 
cd 
. 
e 
e 
e 
° 
° 


THEN, A MASTER CLEAR IS 


‘. aenenee ee 


TEST 41 = IDLE SYNCHS TEST = CHAR MODE 


THE DEVICE IS ENABLED FOR TRANSMIT AND pF AND A MESSAGE IS 
MODE. 24(DEC) SYNCHS ARE SENT 

EACH SYNCH IS TIMED AS IT IS RECEIVED, 

FOR A VALID SYNCH CHAR FOR EACH OF THE 22 SYNCHS WHICH 

THE FIRST TWO (THESE PERFORM SYNCHRONIZATION, AND ARE NOT READ). 

WHILE THE LAST SYNCH IS BEING TRANSMITTED, OC IS SET, AND THE 

NEXT CHAR RCV'D AFTER THE SYNCH IS CHECKED TO BE 377 (LINE MARKING). 


AND THE BITS ARE CHECKED 
FOLLOW 


ISSUED. 
THE SYNCH CHAR USED IS 226 (OCTAL). 


JARRE EKER ERE E KE 


BoNTST 


MOV #24$ ,RETADR 
ll PC, INI TRN 


SYN 
CRC?" CRC! IDLE !DDCMP 
MOV #22. ,R1 


#SYNCH, TXWORD 
ao ,LDTXS] 


035256 002362 
005512 
000026 
000226 002422 
005146 
6$ 
PC,WAITSO 


PC,RCV1ST 


000025 V #21.,R1 
007722 PC, CKDATA 


005120 
007406 


R1 


8$ 
007722 PC,CKDATA 


000011 002400 


#11 ,REGNUM 
000200 002366 


#0C ,WRIBYT 


TAT 32 
sSET TEST EXIT ADRS FOR ERRORS 
sMST CLR, LOAD 2 SOM'S 
; INIT COUNTER 


;LOAD AN SOM INTO TX SILO 
:DECR COUNTER 


;BR IF MORE TO Shee 
sALLOW SILO TO_RIPPLE 
CLK LU UNTIL RD SYNCH RCV'D (RCVR IS ACTIVE) 


INIT COUNTER 
READ A SYNCH, CLK NEXT ONE 


;DERC COUNTER 
[BR IF NOT ALL CHECKED 
> CHECK LAST SYNCH 


:SET REG NO. 
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SYNCHS TEST = CHAR MODE 


003722 JSR PC, WRITLU :SET OC IN REG 11 
005226 45R PC. STPLU “FINISH CLOCKING CHAR, AND THEN SOME 
007722 4s PC, CKDATA :RCV A MARK CHAR, CHK IT 


0 
003576 24$: JSR PC,MSTCLR ; ISSUE MASTER CLEAR TO CLEAN UP 


ENDTST 
10075: 
TRAP CSETST 


SL ARAAARAAAARARARARAAARRAARRARAARRAAAARARHRARRRARRRARERRARRARAORRERRERRRH 
“SBTITL TEST 42 = STRIP SYNCH TEST 
* 
* THE DEVICE IS ENABLED FOR TRANSMIT AND RECEIVE, AND A MESSAGE IS 
INITIATED IN CHAR MODE AND WITH THE STRIP SYNCH 
BIT SET. THEN. 24 (DEC) SYNCHS ARE SENT 
FOLLOWED BY THE FOLLOWING DATA CHARACTERS : 377, 000, 125, 252, 
AND 2 TERMINATING SYNCHS 
EACH OF THE 23 SYNCHS A sER THE FIRST ARE CHECKED AT THE TRANSMITTER OUTPUT, 
Y SCANNING THE TXDATA 
EACH USYRT RCV FLAG IS TIMED AS _IT Is RECEIVED, AND THE 4 DATA WORDS 
ARE READ AM!) COMPARED TO EXPECTED V 
FINALLY, THE LINE UNIT IS CLOCKED FOR SEVERAL CHAR TIMES, AND A CHECK 
1S MADE FOR QACT = 0 (TEOM SHOULD CAUSE TX ENABLE TO DROP). 
THE ABOVE TEST IS REPEATED FOR EACH OF THE FOLLOWING SYNCH’ CHAR DATA 
PATTERNS : 226,000,125,252,376, 
2412 i aeeuusnasanesaeinessusaceaucaneinasdaanaenaesnaanaasaenaensesnsaneeses 
2413 035264 BGNTST 
035264 142:: 
2414 035264 035504 002362 MOV #24$ ,RETADR :SET TEST EXIT ADRS FOR ERRORS 
035512 MOV #SYNPAT RI :GET POINTER TO DATA 
035306 2s: MOV (R1) ,3$ :GET A SYNCH PATTERN 
005512 JSR PC, INI TRN :MST CLR, LOAD 2 SOM'S 
3$: .WORD 0 :SYNCH PATTERN GOES HERE 
CRC2!CRC1!STRIP! DDCMP 
000400 002422 MOV #TXSOM, TXWORD 


00002 #22., 
005146 6$: PC LBTKS! 


Be Be Se Be Be Be 


& 
* 
sd 
* 
* 
ao 
* 
* 
* 
** 
. 
-* 
. 
3* 


;LOAD 22 SOM'S INTO TX SILO 


6$ 
010770 PC,LODMSG ;LOAD DATA CHARS INTO TX SILO 


#TXEOM, TXWORD 

;LOAD A TEOM 

;LOAD ANOTHER TEOM 

sALLOW SILO TO RIPPLE 
2432 035366 ;GET CURRENT SYNCH PATTERN 
2433 035372 000027 #23. ,R2 INIT COUNTER 
2434 035376 JSR ‘ [CLOCK OUT FIRST SYNCH 
2435 035402 CHK! 8. 
2436 035404 011150 : P CHECK TX"D SYNCH 








CZDMRB 
TEST 42 = STRIP SYNCH TEST 


Hi 
HE 
HC 


C 14 

M8203 STATIC DIAG #1 MACRO VO3.01 17-O0CT=79 08:49:54 PAGE 24-50 SEQ 177 
2437 035410 000000 16$: -WORD 0 ven PATTERN GOES HERE 
2438 035412 Op a96 DEC Re SDECR COUNTER 
2439 035414 00137 BNE 14$ SBR IF NOT DONE CHECKING LAST 23 SYNCHS 
2440 035416 004737 007406 JSR PC,RCVIST sCLOCK UNTIL 000 CHAR RCV'D 
2441 035422 000010 8. 
2442 035424 004737 007722 JSR PC,CKDATA iRCV 377, CLOCK 000 
2443 0354 000377 377 
2444 035432 00001 8. 
2445 035434 004737 007722 JSR PC,CKDATA sRCV 000, CLK 125 
2446 035440 000000 000 
2447 035442 000010 8. 
2448 035444 004737 007722 JSR PC,CKDATA sRCV 125, CLK 252 
2449 035450 000125 125 
2450 035452 000010 8. 
2451 035454 004737 007722 JSR PC,CKDATA sRCV 252, CLK END OF MSG 
2452 035460 000252 252 
2453 035462 000040 32. 
2454 035464 004737 005324 JSR PC,OACTIV CHK FOR OACT = 0 
2455 035470 000000 0 
2456 035472 062701 000002 ADD #2,R1 INIT SYNCH PATTERN POINTER 
2457 035476 020127 035526 CMP R1,ASYNPAT+12. SEE IF ALL PATTERNS CHECKED YET 
2458 035502 103675 BLO 2$ :BR IF NOT YET 
2459 035504 004737 003576 248: JSR PC,MSTCLR ISSUE MASTER CLEAR TO CLEAN UP 
2460 035510 ENDTST 

035510 L10076: 
6) 035510 104401 TRAP CSETST 
2462 035512 000226 SYNPAT: 226 
2463 035514 000000 000 
2464 035516 000125 125 
2465 035520 000252 252 
2466 035522 000376 376 
2467 035524 000177 177 
2468 
2469 
2470 
2471 
2472 


24 44 44 44 44 444444 


te ee he ee ot ne Ot be nt Be me ee 


44 44444444 
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HARDWARE PARAMETER CODING SECTION 


! .SBTTL HARDWARE PARAMETER CODING SECTION 
Z 
5 SAIIIIIITIIITTIAATIA IAI ATT STATA TASTES AAAS 
6 37 THE HARDWARE PARAMETER CODING SECTION CONTAINS MACROS 
7 :/ THAT ARE USED BY THE SUPERVISOR TO BUILD P=TABLES. THE 
8 :/ MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE 
9 :/ INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. THE 
10 ;7 MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS 
11 ;/ WITH THE OPERATOR. 
is SSIIIIIIIITITIIITITITSITAAAATTTITTTAT TATA TATA TTTAAPTTS TTD APPS 
14 035526 BGNHRD 
035526 000022 ~WORD L10077=L$HARD/2 
- 035530 LSHARD: : 
16 035530 GPRMA ADDRES,2.0,160000,177776, YES 
035530 001031 .WORD TS$CODE 
035532 035574 . WORD ADDRES 
035534 160000 -WORD TSLOLIM 
035536 177776 -WORD TSHILIM 
17 035540 GPRMA VECTOR, 4,0,0,674, YES 
035540 002031 -WORD TSCODE 
035542 035622 -WORD VECTOR 
035544 000000 -WORD TS$LOLIM 
035546 000674 ~WORD TSHILIM 
18 035550 GPRMD PRIRTY,6,0,7000,4,7,YES 
035550 003032 -WORD TSCODE 
035552 035653 -WORD PRIRTY 
035554 007000 -WORD 7000 
5556 000004 -WORD TSLOLIM 
035560 000007 .- WORD TSHILIM 
19 035562 GPRMD ISRUN,24,0,7,0,7.,YES 
035562 012032 -WORD TS$CODE 
035564 035704 -WORD  ISRUN 
035566 000007 «WORD 7 
035570 900000 -WORD TSLOLIM 
20 035572 000007 .WORD TSHILIM 
21 035574 ENDHRD 
~EVEN 
2 035574 L10077: 
23 035574 104 105 126 ADDRES: .ASCIZ /DEVICE CSR ADDRESS : / 
035577 111 103 105 ~ 
35602 040 103 123 
122 040 101 
035610 104 104 122 
035613 105 123 123 
035616 040 072 040 
035621 000 
24 035622 104 105 126 VECTOR: .ASCIZ /DEVICE VECTOR ADDRESS : / 
035625 111 103 105 
035630 040 126 105 
035633 103 124 117 
035636 122 040 101 
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HARDWARE PARAMETER CODING SECTION 


035641 104 104 122 
035644 105 123 123 
035647 040 072 040 
35652 000 
25 035653 104 105 126 PRIRTY: .ASCIZ /DEVICE PRIORITY LEVEL : / 
35656 111 103 105 
35661 040 120 122 
035664 111 117 122 
035667 111 124 131 
035672 040 114 105 
035675 126 105 114 
700 040 072 040 
035703 000 
26 035704 115 111 103 ISRUN: .ASCIZ /MICROPROCESSOR RUN SWITCH = TYPE O IF OFF, 1 IF ON: / 
035707 122 117 120 
035712 122 117 103 
035715 105 123 123 
035720 117 122 040 
035723 122 125 116 
035726 040 123 127 
035731 111 124 103 
035734 110 040 055 
035737 040 124 131 
035742 120 105 040 
035745 060 040 111 
035750 106 040 117 
035753 106 106 054 
035756 040 061 040 
035761 111 106 04 
035764 117 116 040 
035767 072 040 000 
27 -EVEN 
28 
29 
30 
31 
32 
33 


r 
' 
L 
' 
U: 
L 

' 
L: 
L 
L 
L 
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SOF TWARE PARAMETER CODING SECTION 





> -SBTTL SOFTWARE PARAMETER CODING SECTION 
3 
4 UU 
5 3 THE SOFTWARE PARAMETER CODING SECTION CONTAINS MACROS 
6 ;/ THAT ARE USED BY THE SUPERVISOR TO BUILD P-TABLES. THE 
7? 3/7 MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE 
8 ;/ INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. THE 
9 i/ MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS 
10 of ITH THE OPERATOR. 
\) SAPPIIIITITILITT TAD ALTAD ITLL A LIAL ALLA T SALAD AIPA ATAPI 
L 
13 035772 BGNSF T L 
035772 000000 «WORD 1 10100=1 $SOF T/2 u 
035774 LSSOFT:: L 
14 L 
15 L 
16 035774 ENDSFT L 
EVEN L 
035774 10100: L 
17 4 
18 ~EVEN L 
1 L 
20 L 
2) L 
22 L1 
23 L} 
24 L1 
25 L1 
26 u| 
o7 yeeeene PATCH ARFA FOR DEBUG ****e8 L' 
28 035774 PATCH: 24 
29 036174 .=.*200 L' 
30 036174 000240 NOP L* 
31 036176 000240 NOP 4 
32 036200 000240 NOP 5 
33 LRAAAAARRARETR ERE ERE RE REAR Ree ‘Fy 
bn L’ 
35 L* 
36 L 
036202 ENDMOD L‘ 
L' 
39 036202 LASTAD L 
EVEN L 
036202 000000 WORD 0 L 
000000 -WORD 0 L 
036206 LSLAST:: L' 
40 L' 
41 000001 LEND L’ 
L 
L 
L 
L 
L 
Ll 
Ll 
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SYMBOL TABLE | 
ABORT = BIT? = 000200 G CSOPEN= 000034 EM23 012751 EVL = 000004 G 
ADDRES 035574 BIT8 = 000400 G CS$PNTB= 000014 EM24 012772 ESEND = 002100 
20 G BIT9 = 001000 G CSPNTF= 000017 EM25 013007 ESLOAD= 000035 
ANBITS 002561 BOE = 00 G CSPNTS= 016 EM26 013043 FMT1 011426 
APA == 000200 LL = 00 CSPNTX= 1 EM27 013075 FMT10 §=©011671 
ASBCO = 000020 BSEL1 002450 C$Q10 = 000377 EM28 013126 FMT11 011722 
ASBC1 = 0 BSEL2 452 C$RDBU= 0 EM29 013147 FMT19 = 011761 
ASBC2 = 000100 BSELS 002454 C$REFG= 000047 M3 012174 FMT2 011436 
ASSEMB= 10 CARR = 1 CSRESE= 000033 EM30 013164 FMT24 =012012 
AX 002402 CHPCHK= 1 0 CSREVI= 3 E 013205 FMT27 = 021554 
AX0.15= 002322 CHPTYP 002430 C$RFLA= 000021 EM32 013222 FMT3 011460 
AX0.16= 002324 CKDATA 007722 $RPT = 000025 EM33 013251 FMT4 011522 
Ax = CKTBIT 011150 C$SEFG= 000046 M34 013274 FMTS 011535 
AX1.15= 002326 CRCCHK= 100000 C$SPRI= 000041 EM35 013322 FMT6 011565 
AX1.16= 002330 CRCTYO= 1 C$SVEC= 3 EM36 013342 FMT7 011620 
A = CRCTY1= 000002 C$TPRI= 000013 EM37 01335 FMT8 011630 
AX2.15= 002332 CRCTY2= 4 C32BCC= 000040 EM38 013377 FMT 011664 
AX2.16= 0023 CRC1 = 000100 C32ENB= 000004 EM39 013414 FRSTIM 002412 
AX3.15= 002336 CRC2 = 000200 DD = 000100 EM4 012213 F$AU_ = 000015 
AX3.16= 002340 CS = 00000 DDCMP = 000 EM4O 013434 FSAUTO= 000020 
AX315U= 00037 C$AU_ = 000052 DE 002434 EM41 013450 = 
024174 CSAUTO= 1 DEVPTR 002436 EM42 013471 FSCLEA= 000007 
A10 034156 K = 000022 DFPTBL 002252 G EM43 013506 FSDU = 000016 
C$BSEG= 000004 DH1 014240 EM44 013533 FSEND = 000041 
A3 027262 C$8SUB= 000002 DH2 014262 EM45 013560 FSHARD= 000004 
AG 027376 C$CEFG= 000045 DH3 014311 EM46 013605 FSHW = 000013 
AS 027506 C$CLCK= 000062 DH4 014347 EM47 013640 FSINIT= 
A6é 027702 C$CLEA= 000012 DH5 014411 EM48 013673 FSJMP = 000050 
A7 030246 C$CLOS= 000035 DH6 014414 EM49 013726 FSMOD = 
A8 C$CLP1= DH7 014417 EMS 01226 FSMSG = 000011 
Ag 031012 C$CVEC= 000036 DH8 EMSO 013765 FSPROT= 000021 
BADDAT 002406 C$DCLN= 000044 DH9 014510 EM51 014021 FSPWR = 000017 
BCC = 000001 C$DODU= 000051 DIAGMC= 000000 EMS2 014061 FSRPT = 000012 
BCCCHK= 100000 C$DRPT= 000024 DISILO 002426 EMS3 014122 FSSEG = 000003 
BiTO = 000001 G C$DU_ = 000053 DISSI = 000040 EMS4 014162 FSSOF T= 000005 
BITOO = 000001 G CSEDIT= 000003 DTR = 000100 EM6 012317 F$SRV = 000010 
BI1TO1 = 000002 G SERDF= 000055 EBLK = 000002 EM60 014204 F$SUB = 000002 
BITO2 = 000004 G CSERHR= 000056 EF .CON= 000036 G EM65 014220 F$SwW = 000014 
BITO3 = 000010 G CSERRO= 000060 EF .NEW= 000035 G EM7 012350 FSTEST= 000001 
BIT04 = 000020 G CSERSF= 000054 EF .PWR= 000034 G EM8 012365 GETALL 004500 
BITOS = 000040 G CSERSO= 000057 EF .RES= 000037 G EM9 012406 GETPRM 021262 M 
BITO6 = 000100 G CSESCA= 000010 EF .STA= 000040 G = 000004 GETREG Mm 
BIT07 = 000 G CSESEG= 000005 EM1 012101 ENDIT 021440 = 0 m 
BITO8 = 000400 G C$ESUB= 000003 EM10 012423 ENDPAT 003220 GOODAT 002404 NI 
BITO9 = 001000 G CSETST= 000001 EM11 012444 ENDTRN 006246 GSCNTO= 000200 O! 
BIT1 = 000002 G C$EXIT= 000032 EM12 012461 = 000002 GSDELM= 000372 Ot 
BIT10 = 002000 G C$GETB= 000026 EM13 012502 ERRFLG 002356 G$DISP= 000003 O! 
BIT11 = 004000 C$GETW= 000027 EM14 012532 ERROR1 002420 GSEXCP= 000400 Ot 
BIT12 = 010000 G CSGMAN= 3 EM15 012547 ERR1 014554 G G$HILI= Q9000C2 O! 
BIT13 = 020000 G C$GPHR= 2 EM16 012576 ERR2 014606 G G$LOLI= 000001 O! 
BIT14 = 04 G C$GPLO= 000030 EM?7 012617 ERR3 015114 G = 000000 Oo 
BIT15 = 100000 G C$GPRI= 0 EM18 012634 ERR4 915576 G GSOFFS= 000400 O! 
BIT2 = 000004 G C$INIT= 000011 EM19 012655 ERRS 016254 G GSOF SI= 000376 0: 
BIT3 = 000010 G C$INLP= 20 EM2 012135 ERR6 016766 G = 000001 O, 
BIT4 = 000020 G I= 000050 EM20 012672 ERR? 017444 G GSPRMD= 000002 0, 
BITS = 000040 G C$MEM = 000031 EM21 012713 ERR8 020076 G GSPRML= 000900 ¢) 
BIT6é = 000100 G C$MSG = 000023 EMc 012730 ERRO 020604 G GS$RADA= 000140 “4 
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SYMBOL TABLE 
GSRADB= LUREG 00230 LSSOFT 035774 G L10061 031112 PATH 002654 
GSRADD= 0 LUR10 = 002302 L$SPC 002056 G L10062 031462 PATI 002664 
G$RADL= 000120 LUR11 = 002304 L$SPCP 002020 G L10063 03202 PATJ 002674 
GSR 000020 LUR12 = 0023 L$SPTP 002024 G L10064 032274 PATK 002704 
GSXFER= LUR13 = 002310 L$STA 002030 G L10065 032636 PATL 003014 
GSYES = 000010 LUR14 = 00231 L$Sw 002302 G L10066 032766 PATM 003022 

x = 000020 LUR15 = 002314 LSTEST 002114 G L10067 033700 PAIN 003032 
HELP = 000001 LUR16 = 002316 LSTIML 002014 G L10070 034162 PATO 003050 
HOE = 100000 G LUR17 = 002320 LSUNIT 002012 G L10071 034362 PATP 3 
IACT = 000100 LUSWI1 24 L10000 002300 L10072 034662 PATU 003104 
IACTIV LUSWI2 002470 110001 002302 L10073 034752 PATV 003152 
IBE = 010000 G LUSWI3 002472 L10002 014604 L10074 035114 PNT = 001000 
IC = 000200 LUIMOD 2000 G L10003 015112 110075 035262 POLL = 000200 
ICIR = 000010 L$ACP 002110 G L10004 015574 L10076 035510 PRI = 002000 
IDL = 000010 L$APT 002036 G L10005 016252 L10077 035574 PRIOR 2350 
IDLE = 000040 L$AU 021606 G L10006 016764 10106 035774 PRIRTY (035653 
IDU = 000040 G L$AUT 002070 G L10007 017442 MAINT1= 000010 PRIOO = G 
IER = 020000 G L$AUTO 021442 G L10910 020074 MAINT2= 000004 PRIO1 = 0G 
IERR = 2 L$cCcP 2106 G L10011 020602 MCLK = 000002 PRIO2 = 000100 G 
INITRN 005512 L$CLEA 021522 G L10012 021060 MCLR = 000100 PRIO3 = 000140 G 
INTFLG 002354 L$CO 002032 G L10013 021062 MODR = 000010 PRIO4 = 000200 G 
INTGRL= 000010 L$DEPO 002011 G L10015 021440 MPCSR 002446 PRIOS = 000240 G 
iRDY = 000020 LSDESC 003470 G L10016 021520 MPIVEC 002460 PRI06 = 000300 G 
ISIRDY 006402 LSDESP 002076 G ‘£10017 021522 MPOVEC 002462 PRIO7 = 000340 G 
ISR = 000100 LS$DEVP 002060 G L10020 021552 MPRIOR 002464 PSTACK 002346 
ISRUN 035704 L$DISP 002124 G L10021 021606 MSG1 003220 RAB = 
IXE = 004000 G L$DLY 002116 G L10022 021670 MSGS 003246 RABT = 
I$AU = 000041 L$DTP 002040 G L10023 021754 MSTCLR 003576 RAX15 002370 
I$AUTO= 000041 LSDTYP 002034 G L10024 022100 MVIOX = 021000 RAX16 002372 
I$CLN = 000041 L$DU =—s-_—« 021524 G £10025 022202 MVIXO = 122000 RCVBUF 003262 
I$DU = 000041 L$DUT 002072 G L10026 022330 MVIXOX= 121000 RCVIST 007406 
ISHRD = 000041 LSDVTY 003462 G L10027 022450 NEWST 021242 RDALL = 
ISINIT= 000041 LSEF 002052 G £10030 022624 OACT = 000100 RDAX = 20 
I = 000041 LSENVI 002044 G L10031 023060 OACTIV 005324 RDRXSI 0067326 
ISMSG = 000041 LSETP 002102 G L10032 023176 Oc = 000200 READAX 004076 
ISPROT= 000040 LSEXP1 2046 G L10033 023314 ocoR = 000020 READLU 003644 
ISPTAB= 000041 LSEXP4 002064 G L10034 023432 = 000002 READY = 000200 
I$PWR = 000041 LSEXPS 002066 G L10035 023550 DY = 000020 REDBYT 002364 
ISRPT = 000041 L$HARD 035530 G L10036 024200 OSIRDY 004634 REDDAT 002500 
I$SEG = 000041 L$HIME 002120 G L10037 024532 OvVRR = 000010 REGNUM 0024 
ISSETU= 000041 LSHPCP 002016 G L10040 025022 O$SAPTS= 00000 REGO 002510 
ISSFT = 000041 L$HPTP 002022 G £10041 025232 O$AU = 000001 REG1 002512 
I$SRV = 000041 L$HW 002252 G L10042 025436 O$BGNR= 000000 REG2 002514 
I$SUB = 000041 LSICP 002104 G L10043 025642 O$BGNS= 000000 REG3 002516 
ISTST = 000041 L$INIT 021072 G L10044 026100 DU = 000001 REGS 002520 
1422 = 000200 L$LADP 002026 G L10045 026332 O$SERRT= 000000 REGS 002522 
JSIMP = 000167 LSLAST 036206 G L10046 026236 OSGNSW= 000 REG6 002524 
LDMSG1 011346 L$LOAD 002100 G £10047 26330 O$POIN= REG7 002526 
LDTXSI 005146 L$LUN 002074 G L10050 026604 O$SETU= 000000 REOM = 000002 
LOADAT 002410 LSMREV 002050 G L10051 026602 PATA 002571 RERR = 000200 
LODMSG 010770 L 002000 G L10052 027262 PATB 002615 RETADR 002362 
LOE = G L$PRIO 002042 G L10053 027402 PATC 002625 RING = 000200 
LOGDEV 002344 L$PROT 021064 G L10054 027512 PATCH 035774 ROMI = 000002 
LOOPIN 004046 L$PRT 002112 G £10055 027706 PATD 002630 ROMO = 000004 
LOT = 000010 G LSREPP 002062 G £10056 030252 PATE 002633 ROR = 000010 
LULOOP= 000010 L$REV 002010 G L10057 030462 PATF 002641 RRDYTO= 000001 
LULP) = 000040 L$RPT 021062 G 110060 031012 PATG 002644 RSEOM 007054 
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CZDMRB M8203 STATIC DIAG #1 MACRO VO3.01 17-OCT=79 08:49:54 PAGE 26-3 SEQ 177 
SYMBOL TABLE 


| 

RSOM = 000001 STPCLK 003540 TXABT = 002000 TSTEMP= 000000 129 031014 G 
RTS == 000040 STPERR 007620 TXCHAR 006074 TSTEST= 000052 13 021756 G | 
RUN == 000200 STPLU 005226 TXDATA= 000040 TSTSTM= 177777 130 031114 G 
RUNINH 002476 STR = TXEN = 000100 T$TSTS= 000001 131 031464 G | 
RXABT = 002000 STRIP = TXEOM = 001000 T$$AU = 010021 132 032026 G 
RXBCC = SUBRPC 002352 TXGA = 000010 TS$AUT= 010016 133 032276 G 
RXCHAR 011046 SVCGBL= 000000 TXGOA = 004000 TS$CLE= 010017 134 032640 G 
RXEBL = SVCINS= 000001 TXLENO= 000040 T$$DU = 010020 135 032770 G 
RXLENO= 1 SVCSUB= 000001 TXLEN1= 000100 TSSHAR= 010 136 033702 G 
RXLEN1= 000002 SVCTAG= 000001 TXLEN2= 000200 T$$HW = 010000 137 034164 G 
RXLEN2= SVCTST= 000001 TXSOM = 00040 T$$INI= 010015 138 034364 G 
RXOVR = 004 S = 2 TXWORD 002422 TSSMSG= 010012 139 034664 G 
RXWORD 002424 Swi = 000 TxO = 000001 TS$PRO= 010014 14 022102 G 
RxO = 000001 SWw2 = 000010 TX1 == 000002 TS$SRPT= 010013 140 034754 G 
RX1 == 000002 SW3_ = = 000040 TX2 = 000004 T$$SEG= 010000 141 035116 G 
RX2 = 000004 SYNCH = 000226 ™x3 = 000010 T$$SOF= 010100 142 035264 G 
Rx3 = = 000010 SYNPAT 035512 TX4 == 000020 T$$SUB= 010051 15 022204 G 
RX4 = =: 000020 SYNO = 000001 Tx5 = 000040 T$$SwW = 010001 T6 022332 G 
RXS = 0 SYN1 = 000002 TX6 == _ 000100 TS$$TES= 010076 17 022452 G 
RX6 = 000100 SYN2 = 000004 Tx? __ = 000200 1 021610 G 78 022626 G 
RK7 == 000200 SYN3 = 000010 TSARGC= 000001 T10 023200 G 19 023062 G 
RIGNRW 002560 SYN4 = 0 TSCODE= 012032 111 023316 G = 000200 G 
SAVES 002414 SYNS = 000040 TSERRN= 000032 T12 023434 G UNIT 002440 
SAVE6 002416 SYN6 = 000100 TSEXCP= 0 113 023552 G UNRR = 1 
SAVLEN 002432 SYN7 = 000200 T$FLAG= 000040 114 024202 G UPBITS 550 
SCRACH S$LSYM= 010000 TSGMAN= 000000 T15 024534 G VECTOR 035622 
—_ 2 20 TEOM = 00 T$HILI= 116 025024 G 8 20 
SECA = 000020 TERR = 000200 TSLAST= 000001 117 025234 G WAITSO 005120 
SELFR = 000040 TEST = 000001 TSLOLI= 000000 118 025440 G w 7 10 
SELSBY= 000002 TESTMD= TSLSYM= 01000 119 025644 G WAX15 002374 
SEL4 002454 TIMFLG 002360 TSLTNO= 000052 T 021672 G WAX16 002376 
SEL6 002456 TMPO 2530 TSNEST= 177777 T20 026102 G WRDY TO= 2 
SETLP 010612 TMP 1 002532 T$NSO = 000000 T20.1 026132 WRIBYT 002366 
SFPTBL 002302 C TMP2 002534 TSNS1 = 000005 T20.2 026240 WRITAX 004264 
$1GQ = 000100 TMP3 002536 TSNS2 = 00 T21 026334 G WRITLU 003722 
SIGR = 000200 TMP4 002540 TSNS3 = 000003 T21.1 026346 xYZ = 000100 

= TMP5 002542 TSPTNU= T2e 026606 G X$ALWA= 000000 
STALL 005? TMP6 002544 TSSAVL= 177777 123 027264 G X$FALS= 000040 
STARES 002444 TMP7 002546 TSSEGL= 177777 T24 027404 G X$OFFS= 000400 
STARST 021232 TSOM = 1 T$SEKO= 010000 T25 027514 G X$TRUE= 000020 
STBY = TSTCON 002474 TS$SUBN= 000000 126 027710 G $LSTIN= 000001 
STEPLU= 000020 TSTNUM 002442 TSTAGL= 177777 T27 030254 G $LSTTA= 000001 
STEPMP= 000001 TXAB = 000004 TSTAGN= 010101 128 030464 G 
- ABS. 036206 


000000 001 
ERRORS DETECTED: 0 


VIRTUAL MEMORY USED: 21664 WORDS ( 85 PAGES) 
DYNAMIC MEMORY AVAILABLE FOR 69 PAGES 
CZ7DMRB.BIC,C7DMRA.SEQ/C/N: TOC=SVC34R.M.8,(7DMRB.P1! 


haspiinatentpanitbetanencienteninenianianpaionddieidh 
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CROSS REFERENCE TABLE (CREF v01-05 ) 


ae 26-502 3924-511 24-5218 
24-3314 
24-=36 

24-7118 


16-107 = 16-122 16-218 16-237 25-16 , 25-238 
24-685 


VIN 
t 
—=h ad 


16-170 16-189 16-227 
16-189 16-207 


16-207 
16-207 


16-209 


gas” 
R 
—_— 
’ 


WIWWNWWOWW 
—a 
' 


ONMMNMM DO O- 


: 
16 
12 
16 
16 
12 
16 
16 
16 
16 
24 


WBWAMMMM DO DO 


a) Oe eee 
COMMU WY UW 
WM 
OFENNNN NN NU 


15-240 15-433 15=441* 15-484" 
2 24-590" 
24-974 


24-181* 
24-691 * 
24-294 


i 
N 
= 

. a 


2 
15-886 


12-63 64 12-200 
12-233 12-246 15-648 15-:56 


12-53 12-62 12-81 12-91 12-103) = 12115) 12"127) 12-139) 12-151 12-1635 12-175) 12=187 









CZDMRB M8203 STATIC DIAG #% 
CROSS REFERENCE TABLE (CREF vO1-05 ) 


12-199 12-211 12220: 12=232 

BIT10 12-208 12-279 12-291 

BIT11 12-20 12-278 12-290 

BIT12 12=20# 

BIT13. 12-20" 

BIT14 12=20# 

BIT1S 12-20 12-322 12-324 12-325 

BIT2 12-20 12-40 12-52 12-61 
12-198 12-210 12-219 12-231 

BITS 12-20 12-39 = 12-51: 12-60 
12-197 12-209 12-218 12-230 

BITS 12-20 12-38 12-50 12-78 
12-208 12-229 12-2462 12-254 

BITS 12-208 12-49 12-70 12-77 
12-207 12-228 12-241 12-253 

BIT6 12-200 12-37 12-48 ~—- 12-69 
12-194 12-206 12-227 12-240 

BIT? 12-20 12-36 12-47 = 1259 
12-193 12-205 12-217 12=226 

BITS 12-208 12-281 12-293 

BIT9 12-20 12-280 12-292 


15-"8* 15-19« 
15-479 19-59* 
BSEL2 13-554 19-61* 19-62* 24-470 
15-85*  24-173* 


C$BRK 
C$SBSEG 7-184 24-72 24-303 24-337 
C$B8SUB 7-184 «24-898 24-924 24-960 


24-297 


12-245 


24-371 


12-257 


24-405 


K 14 
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12-268 


24-680 


12-342 


12-114 
12-113 
12-124 
12-123 
12-110 


12-109 
15-846 


15-126* 
24-834* 


24-731 


15-282 


12-126 
12-125 
12-136 
12-135 
12-122 


12-12% 
15-847 


15-128* 


24-778 


15-591 


12-138 
12-137 
12-148 
12-147 
12-134 
12-133 


15=229s 


24-838 


15=702 


12-150 
12-149 
12-160 
12-159 
12-146 
12-145 


15-367* 


24-900 


12-162 
12-161 
12-172 
12-171 
12-158 
12-157 


15-368* 










12-174 
12=173 
12-184 
12-183 
12-170 
12-169 


15-370* 





12-186 
12-185 
12-196 
12-195 
12-182 
12-181 


15=-460* 


15-660 
15-935 
24-416 
24-792 
24-=66 


24-984 


on 
The. 


CSETST 


CHPTYP 
CKDATA 


CKTBIT 


7-184 
2 


DMRB M8203 STATIC DIAG #1 
CROSS. REFERENCE TABLE (CREF vO1-05 ) 


19-51 


19-74 


16-102 
16-101 


15-;07 


12-1764 
19-40* 


24-52 
2 


16-115 


16-107 
16-162 
16-221 
24-456 


16-112 
16-148 


16-185 
16-209 


24-;56 
19-55 


24-90 
24-760 
24-A10 


16-134 
16-108 


16-222 


19-31 
24-133 


24-<53 


24-=14 


aah 
( 
=’ 
™N 
W 


NJWwOo— 
Sooo 


tt 
MmcoMmn 


Ss Noe——_—_ 
AXXO TTF Co 
N--—— Winn 


o-oo 


24-=58 
19-13% 
24-624 


24-E57 
24-E57 


24-=55 


24-=95 


L 14 
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16-210 


16-123 
16-182 


24-730 


16-230 


16-124 
16-183 


24-739 
24-633 


24-G12 
24-G12 


24-768 


24-£87 


16-244 


16-125 
16-199 


16-130 
16-167 
16-202 
16-228 


24-E69 
24-636 


24-663 
24-663 


24-A31 


24-354 
24-<27 
24-F 55 


16-141 
16-200 


16-229 


24-G21 
24-G73 


24-H19 
24-H19 


24-D72 


SEQ 180 


24-388 
24-<87 
24-F 87 


16-142 
16-201 


24-H35 
24-678 


24-E57 


24-622 
54-=%6 
54-640 


16-143 
16-217 


16-133 
16-170 
16-205 
16-241 


24-G86 


24-F 74 


— 


24-523 
24->32 
24-690 


16-144 
16-218 


16-145 
16-171 
16-206 
16-242 


24-H42 


24-663 


Ci 


a 
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CROSS REFERENCE TABLE (CREF v01-05 ) 













DEVPTR 13-47 19-44% 19-53" 19-55 19=56* 


DH1 16-844 16-109 16-144 16-201 16-220 16-239 

DH2 16-854 16-111 16-126 16-145 16-165 16-184 16-202 16-222 16-240 
DH3 16-864 16-111 16-126 16-145 16-165 16-184 16-202 16-222 16-240 
DH4 16-874 16-113 16-128 16-147 16-167 16-186 16-204 16-224 16-242 


DH7 16-90 16-130 16-149 16-169 16-188 16-206 16-226 
DH8 16-914 16-130 16-149 16-169 16-188 16-206 16-226 
yy 16-132 16-151 16-171 16-190 16-208 16-228 


DISILO 13-434 15-150 15-187 15-201 19-12% 24-B74*% 24-B86* 24-(19* 24-D32* 
4? 12-874 = 12-159 24-B72 24-874 24-C17 = b4=C19 = 24 =D 24 


8 
EBLK 12-1394 ta + 15-895 15-901 


EM14 16-384 24-=35 24-=66 


EM2 16-264 24-50 24-115 = 24-226 = 24-577 = 24-588 3=— 24-936 


EM26 16-50% 24-297 24-895 24-A60 24-B41 24-(89 


15-694 
EM3 16-274 24-84 24-184 24-278 = 24-314 = 24-348 = 24-382 24-416 = 24-637 = 24-647 = 24-694 24-704 24-745 24-754 
24-983 = 24-993 24-298 = 24-321 = 24 -B85 
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CROSS REFERENCE TABLE (CREF vO1-05 ) 


EMS 16-294 24-480 24-518 


34 
ENAX 12-904 12-1624 15-149 15-200 
9-734 


ENDTRN 15-547 24-;78 24-<24 24-<84 24->30 24-710 

EOM 12-624 

ERR1 16-1004 24-24 

ERR2 at 24-50 24-84 24-115 = 24-148 = 24-184 = 24-226 = 24-278 
ERR3 16-1214 24-577 24-588 24-637 24-647 24-694 24-704 24-745 


24-983 = 24-993 24-398 = 24-321 = 24-797 3=— 24-812 = 24-895 = 24 - AG 
ERR4 15-272 (15-278 15-288 15-294 15-401 15-407 15-565 15-597 


ERR6 15-694 15-700 15-708 15-714 16-1794 
ERR7 16-1984 24-<83) 9 24-=26 = 24-=35 4 =47 9 24-=66 = 24 -=74 
ERR8 15-865 15-884 15-890 15-899 15-905 15-914 15-920 15-929 


ERROR1 13-40# - 15-145s 15-158* 15-183* 15-209* 19-14% 24-546 24-560 


FSBGN 718m “7-24 16-100 16-106 16-121 16-140 16-159 16-179 


é 
FSCLEA 97-18 = 21-8 21-11 
$DU 


15-935 


16-198 


16-2164 


16-216 


SEQ 182 


24-416 
24-855 
15-654 


24-499 
24-936 
15-860 


CZDMRB M8203 STATIC DIAG #1 
CROSS REFERENCE TABLE (CREF v0O1-05 ) 


F SEND 


7-18 


16-144 


7-18 


16-111 
16-112 
16-114 


7-18 


16-107 
16-180 


16-123 
24-501 


16-125 
16-126 


16-127 
16-129 


B 15 
MACRO vO03.01 17-OCT-79 08:49:54 PAGE S-6 SEQ = 183 


7-18 
7-2 


7-18 


16-221 
16-145 


16-146 
16-148 


7-18 


24-F 05 
16-160 


16-182 


16-149 


16-150 
16-152 


7-18 
3 


7-18 7-18 


16-140 16-153 16-159 16-179 


16-169 
16-170 
16-172 


7-18 


7-18 








CZDMRB M8203 STATIC DIAG #1 


CROSS REFERENCE TABLE (CREF v01-05 ) 


16-243 

FMT7 —«- 1615 = 16-109 

FMTB) 16-168 = 16-124 

FMT9»=—-'16=17# = 16=113 
16-242 

FRSTIM 13-378 19-16 

GSCNTO 7-184 

GSDELM 7-184 

G$SDISP 7-184 

GSEXCP 7-184 

G$SHILI 7-184 

G$SLOLI 7-184 

G$NO 7-184 

GSOFFS 7-18 25-16 

GSOFSI 7-184 25-16 

GSPRMA 7-184 25-16 

GSPRMD 7-184 25-18 

GSPRML 7-184 

GSRADA 7-184 

G$SRADB 7-184 

G$SRADD 7-184 

GSRADL 7-184 

GSR 7-184 25-16 

GSXFER 7-184 

GSYES -184 25-16 

GETALL 15-222" 15-270 

5-692 15-698 

15-:65 15-:71 
24-911 24-934 
24-993  24-A58 

GETPRM 19-36 19-478 

GETREG 15-99" 15-228 
24-497 24-516 

GOAH —- 12-60# 

GOODAT 13-34  15-850« 
24-143% 24-144 
24-514% 26-5728 
24-788* 24-7978 
24=:9G% 2h-:178 

HDX 12-784 12-1484 

HELP 74M 8-9 

HOE 12-204 

I$AU 7-184 23-94 

ISAUTO 7-18# 20-78 

ISCLN 7-18 21-84 

1$DU 7-184 22-84 

ISHRD 25-144 25-218 

ISINIT 7-184 84 

ISMOD 7-18 7-24 

I$MSG 7-184  16-100# 
16-2108 16-2168 

ISPROT 7-184 18-84 

ISPTAB 7-184 

1$PwR 7-184 

ISRPT 7-184 17-9m 

ISSEG 7-184 -14 


ra) 
24-332 24-3374 


16-144 
16-163 
16-128 


19-25 


25-17 
25-17 


16-23.4 


17-114 
24-39 
24-3504 


16-201 
16-183 
16-132 


25-18 
25-18 


24-a08* 
9-10 


16-2364 


24-67 
24-366 


16-220 
16-147 


26-374 
16-1154 
16-2444 


24-724 
24-3714 


16-239 
16-151 


24-319 


24-146 


16-110 


24-a91* 


16-1214 


24-864 
24-3844 


16-167 


24-A56* 


16-1344 


24-101 
24-400 
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16-171 


16-1404 


24-128 
24-4054 


16-186 


24-276 


16-1534 


24-166 
24-4184 


16-190 


24-C85* 


16-1594 


24-203 
24-449 


SEQ 


16-204 


15-611 
15-912 
24-790 
24-=64 


24-346 


24-46% 
24-378* 


24-D05* 


16-1734 


24-247 
24-539 


184 


16-208 


15-617 
15-918 
24-799 
24-=72 


24-380 


24~-80* 
2 


24-D21* 


16-1794 


24-298 
24-610 


16-224 


24-414 


24-1108 
24-4768 
24-7418 
24-988* 


16-1924 


24-3034 
24-676 


16-228 


15-658 
15-933 
24-863 
24-410 


24-478 


24-111* 
24-495* 
24-750* 
24-989* 


16-1984 


24-316" 
24-6808 





CZDMRB M8203 STATIC DIAG #1 


CROSS REFERENCE TABLE (CREF v01-05 ) 


ISSETU 


ISTST 


LSCLEA 


15-609 


24-727 
2 


24-A05 


24-=95 


24-7314 
24-9154 
24-A26 


24-67 


24-6404 
24-783 
24-A70 
24-A68 
24-E57 


24-768 
24-<51 


24-746 
2 


MACRO VO3.01 17-OCT-79 08:49 


24-7564 
24-957 
24-B69 


24-G594 
24-203 
24-818 
24-663 
24-A31 


24-=53 


15=:28 


D 15 
754 PAGE S-8 


24-A94 
24-=93 


15=:34 


24-7784 
24-722 
24-058 


2 
24-G904 


24-824 
24-B30 


24-€13 
24->59 


24-G904 


24-063 
24-B47 


24-728 


24-C72 


24-8034 


24-a72 
24-B53 


24-C07 


24-80 


SEQ =s«185 
24-832 24-8384 
24-<49 24-=07 
24-F70 24-608 
24-332 24-366 
24-9204 24-9204 
24-9994 24=-:22 
24-C05 24-058 
24-524 24-67 
24-1504 24-1504 
24-2474 24-279 
24-35 24-366 
24-5234 24-5234 
24-648 24-655 
24-774 24-7748 
24-939 24-93 
24-;324 24-;324 
24-<87 24-<87# 
24->484 24-712 
24-043 39— 24-434 
24-B564 24-869 
24-E354 24-E354 
24-F87 24-F 874 
24-H134 24-H60 
24-879 24-884 
24-C€51 24-C76 
24-070 3= 24 -E 55 
24-093 24-001 


24-A01 
24-C97 


24-F 07 


24-009 


24->48 
24-13 


24-A07 
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CROSS REFERENCE TABLE (CREF v01-05 ) 


LSDESC 8-17 14-178 


LSDISP 8-17 9-84 


L$OU 8-17 22-84 


LSDUT 8-174 
LSDVTY 8-17 14-124 
LSEF 8-174 


LSHARD = 8-17 25-14 25-144 


L $HWw 8-17 10-9 10-94 
LSINIT 8-17 19-84 
LSLAST 8-17 26-3948 


LSPROT 8-17 18-84 


LESOFT 26-13 26-134 


16-2444 





CZ7DMRB M8203 STATIC DIAG #1 


CROSS REFERENCE TABLE (CREF v01-05 ) 


L10013 17-114 


24-2328 
24-2864 


24-566 
24-648 


24-994 
24-322 


25-214 
26-164 


15-451 
24-876 


24-578 24-589 24-5964 
24-6554 


24-9994 
24-; 328 


15-452 =15=510 = 15=:01 = hn 34 a= 35 
24-D75 — 26-D97 hm E27 = 24 E31 = 24 - E60 


F 15 
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24-:59 
24-F 12 


24~;07 
24-F 76 


24-=38 
24-617 


24-234 
24-518 


SEQ 


24-277 
24-666 


24-057 
24-H22 


24-A40 
24-H29 





CZDMRB M8203 STATIC DIAG #1 


CROSS REFERENCE TABLE (CREF v01-05 ) 


LOADAT 13-36" 16-161 

LODMSG 15-994" 15+:99 

LOE 12-20 

LOGDEV 13-178 19-42 

LOOPIN 15-125# 24-463 

LOT 12-20 

LUIMOD 7=24# | 

LULOOP 12-39% 15-36 

LULP. s- 12=708 = 12-135 

LURIO 12-3014 15-101 

LUR11 12-302 16-112 

LUR12 12-303 16-112 

LUR13 12=304# 16-112 

LUR14 12=305# 16-114 

LUR15 12-3064 16-114 

LUR16 12-3074 16-114 

LUR17 12-3084 16-114 

LUREG 12-301 12-302 
12-315 12-316 

LUSWI1 13-624 

LUSWI2 13-634 

LUSWI3 13-648 

MAINT! 12-794 

MAINT2 12-80# 

MCLK -12=175# 26-471 

MCLR 12-37 {5-32 

MODR  12-149# 

MPCSR 13-534 16-101 

MPIVEC 13-59" 19-67 


OACT 12-1224 15-397 
OACTIV 15-3874 15-439 
12-59% 12-1214 
OCOR 12-1724 15-284 
oP 12-257# 12-259 


24-906* 
24-613 


19-48 


24-907* 
24-H25 


19=49 


8-74 


15-464 
15-471 
24-D27 
15-476 


19-51 


8-17 


15-521 
82 


20-16 


24-834 


15-557 


22-12 


— 3 3 ow 3 IL) 
icthhhh bh hkl 
WMPMNMNMNMNN—9m 


07 


24-032 
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WHIM MMM NNN 
OMMNNMNMNMNO 
BO WMUTUT UTA ALA 


— —2 3 = = =) 2) =) = 


16-199 


24-275 
24-801 


24-C 36 


16=223 


26-(57 


16-241 


12-310 


16-237 


24-787 
24-B15 


24-074 


12-311 


24-095 


SEQ 


188 


12-312 


24-H59 


24-011 





12-313 


24-19 


24-258 
24-845 


24-030 


12-314 


24-069 
24-23 


24-367 
24-:27 
24-855 


24-54 
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CZDMRB MB203 STATIC DIAG #1 MACRO VO03.01 17-0CT=79 08:49:54 PAGE S12 SEQ «189 
CROSS REFERENCE TABLE (CREF v01-05 ) 


ORD Y 12-1244 15-268 15-274 24-269 24-270 24:79 
OSIRDY 15-2584 15-437 15-454 15-481 15-525 15-531 §=555 = 24"962 = 24=972 hm :28B ha: 37  — b=3252 = 24366 ==: 84 
24-309 = 26-325 24=328 = 24-024 24-030) 24-0460 24-149 24" 59 


PATI 13-2064 24-554 24-558 24-612 = 24-697 = 24700 = 24-929 24-932 
PATJ 1¢- Sous 24-592 24-615 24-619 24-620 


PATL 13-3024 24-708 24-729 24-805 
PATM 13-3114 24-43 24-46 24-108 = 26-171 24141 14460 h177 24-180) = 24-214 = 2-250) = 24-758 


PRIO2 12-204 

PRIO3 12-20 

PR104 12-204 

PRIOS 12-204 

PRIO6 12-204 

PRIO7 12-208 20-9 20-11 24-16 24-18 

PRIOR 13-194 

PRIRTY 25-18 25-254 

PSTACK 13-184 15-296 15-409 15-621 15-662 15-716 15-944 15=:79 19-10* 
RIGNRW 13-109 24-74 24-77 

RAB 12-1384 15-908 15-910 15-916 

RABT 12-1984 

RAX15 13-284 15-162* 15-163* 15-233 24-569* 24-570 24-574 24-629* 24-630 24-634 24-688 24-691 24-739 = 24=742 


24-786 = 24-789 24 -B46* =24-847* 24-848 = 24-852 24-976 = 24-980 = 24-292 b= 295 b= 515 b= 518 = 24-7291 24=729K 
24-806 3924-2809 = 24-820) 0 24-889 24-892 24-A54 —4-AS7 —_24-B35 4 -B38 —24-B79— O4-BB2 4-83 4-86 = 24 -D03 


RAX16 13-29 15-166* 15-167" 15-235 15-690 15-696 15-704 15-710 24-581 24-585 24-640 24-644 24-697 24-701 
24-768 = 24-751 24-795) 24-798 = 24-858 = 24-862 24-904 = 24-910 = 24-929 = 24-933 = 24-986 = 24-990 
RCV1ST 15-756 24-079 24-F72 24-F18 24-G70 24-H40 
2-884 12-1604 ia=169 
5-143 15-232 15-687 24-559 = 24-626 = 24-687 = 24-738 = 24-785 = 24-843 24-903 = 24-928 = 24975 b= 291 b= 516 
-52# 15-103 15-153 15-161 15-165 15-204 = 15-265 15-281 15-394 = 15-463 15-475 15-560 }=-15=590 =: 15-606 


a4 
5 
15-647 15-734 3915-738 3815-777 = 15-855) 15=:60 24-42 24-76 24-107 = 24-139 24-176 b= 217 = h= 265 24 306 
24-340 924-376 = 24-408 24-2460 2:78 ham<7B ham =21 0h =30 hm =h2 0 4==61 24 =69 


U 
Ul 
Ul 
UI 
V 
vi 
bi 
w, 
ws 
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CZDMRB M8203 STATIC DIAG #7 MACRO VO3.01 17-00 T=79 08:49:54 PAGE S=13 SEQ 190 
CROSS REFERENCE TABLE (CREF v01=05 ) 


REDBYT 13-26 15-64" 15-65" 15-106 15-154 15-162 15-166 15-205 15 
15-464 15-676 15-561 15-593 15-599 15-609 15-615 15-650 15-656 15-735 15-739 15-778 15-856 15=:63 
15=:69 24-43 24-47 24-77% 24-78 24-81 24-108 24-112 24-141 924-145 24-177 = 24-181 = 24-218 * 
26-219 = 26-223 24=266* = 24-269" «24-271 = 24-275 4=307* 824-308 = 24-311 4 341* 264-342 924-345 24=375* 24-376 
24-379 = 24=4609% 26-410 = 24413 24-4708 264-4671 4-477 = 24 =490% «24-491 24-496 = 24=509% 24-510 89= 24515 a= 347 
24-:79 = 2h=<79 hm=22 0 hm =31 0 h=635— b==62 = 24 ==70 

REDDAT 13-69% = 24-249 24-259 24-260" 264=270* 24-271 = 24276 24613 = 26-621* 26-622 24-630 8924-633 24-640 §3=9— 24-643 

REGO 13-79 = 26-469" 26-4673* 24-489" 24-493" 24-508" 24-5128 


274 15-284 15-290 15-397 15403 


REG} 13-804 
REG2 13-814 
REGS 13-824 
REGS 13-8 


REG? 13-864 

REGNUM 13-32@ 15-5 15-80 15-1 15-102" 15-106" 15-107 15-109" 15-144 15-146* 15-160" 15-164" 15-168* 15-182 
15-184" 15-189* 15-193" 15-197" °5=210* 15-258  15-264* 15-280" 15-295" 15-301* 15-338  15-340* 15-343" 15-346* 
15-387 = 15=393* 15-408" 15-614" 15-632 15-6478 15-459% 15-473% 15-4685* 15-548 15-551* 15-559* 15-567" 15-583 
15-589" 15-605" 15-620" 15-626" 15-640 15-646* 15-661* 15-667* 15-732 15-733* 15-737* 15-740" 15-7 15-761* 
15-793" 15-809 15-810" 15-821" 15-838 15-854" 15-862* 15-868" 15-943% 15-948* 15-963 15-968* 15-980* 15-:52 


264=205* 26-209 26=213* 26-228 26-256" 24-257 24-263" 26-264 264-267 24 300* 24-334" 26-368 24-402" 24-458" 
24-548" 26-562 24-B93* 26-9648 26-9678 26-2438 2ha:7he 24-<54% 24=<77* 26-=20% 24-771" 26-851* 24-A34" 24-A978 
26-B71* 26-C16* 24=(20" 26-023 24=D26" 24-G81* 

REOM 12-199 15-7046 15-710 


RETADR 13-25 15-297 15-610 15-622 15-663 15-717 15-945 15=:80 24-959" 24=:23* 26-353" 24-<02* 24-<50* 24-=118 
24-=92% 26-49% 26-764" 24-944" 26-A27# 26-A90® 26-06" 24-D59% 24-£54" 24-F06* 26-F71* 26-G09* 24-G60* 24-H14" 


ROM! 12-418 15-16 15-18 15-19 15-126 815-128 
ROMO 12-404 15-16 15-18 15-19 15-126 =. 15= 128 


ROR 
RRDYTO 12-341 15-145 15-158 24-560 
RSEOM 15-6808 15-771 26-@65 926-8746 04-81 4 G86 4-ANS = 26-811 24-B20  4-B274-B32 0 4-B49 24-0535 = 24-078 


5-33 15-128 24-134 


RXCHAR 15=:20 24-E76 24-F80 26-F82 = 26-EB4 Ah aF 22 hf 26 = HF 30 4HF 34 bHF 3B bHF42 Ob=F46 0 O4-FS50  —_4=F 52 


RXLENO 12-2698 15-844 26-F66 26-F74 9 2HF 26 0 24-F 32 24-F40 = 24-F 48 
RXLENT 12-2684 15-844 24-£70 26-E74 9 2hmF 240 OhmF 2B O4-F40 = 4-F 4G 
RXLEN2 12-267 15-844 26-E66 9 24-E70 9 2b E76 mF 26 KF 28 = OGHF 32 0 LF 36 


RXWORD 13-424 15-735* 15-736* 15-7359 15-847* 15-848 15-853 15-869 15-875 15-880 15-886 15-895 15-901 15-916 
15-916 15°925 15-931 
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19-348 19-344 19-35 19-354 19-51 19-51 19+51 ag $y 19-514 19-514 19-52 19-524 19-74 19-744 


24-232 26-32 24-281 24-:B1H  26-<27 — 24-< 27H 24-<B3 —-24-<B3 —24-<B3_—-24-<B3 — 24-<B3H  24-<834 
24-<B3H  24-<B?  24-<B7H  24~= 24-=26 24== 24-=26 24-=26H 24-= 24==26" 26-=26" 24-=264 
24-=35 — 24-=35 — 24== 35H 24-=35H  24-=35H  24-=35H  24-=35H 24-=47 24-247 24-247 h-=47 — 24-=478 
24-=47H 24-=47" 24-= 4-= 24-= 24-= 24-= 24-= 24-5 4-= 24-= 24-=74 


MSGNL S Rath 7-184 34-86 24-864 = 24-316 24-3164 24-350 24-3504 924-384 9 24- ~38Ge 24-418 24-4184 
MEGNSU 1-B98# 7-184 54-896 24-8984 246-924 = 24-9246H = =246-960 =. 24 - 9604 
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24-352 24-;52 24-:524 26-;52 24-;818 24-<01 24-<01 ~ 24-<01 9 24=<01H = 24-<014 24-<01H 24-<27H# = 24-<49 = 24~<49 
24-<49 eta be 24-<49H 24-<495H 24-<B3# se-<re 24-=07 24-=07 s-=9! 24-=074 24-=07H 24-=07H 24-=26H 24-=35¢ 


24-F 70H = 24-F 70H = 24-F70H 24-F 87H 24-G08 24-G08B 24-G0B  24-GO08H 24-G0BH 24-G0BH 24-G40H 24-G59 24-G59 24-G59 
24-G59H = 24-G59H 24-G5S9M 24-G90F 24-H13) —_24-H15 = 24-H13 4-H 13H  24-H13H 24-H13H 24-HO60M = 25-14 25-14 25-144 
25-148 26-13 26-13 26-134 26-134 

M$IOSE 1-A00# 7-184 , 

MSLDRO 1=(42# 7-184 19-25 19-254 19-28 19-284 19-31 19-314 19-34 19-344 19-51 19-514 20-9 20-94 
20-16 20-164 24-16 24-164 

MSMASK 11-0714 7-184 

MSMCHI = 

MSMCLO i, 7-18 7-184 7-184 


MSMSK1 -a77# 7-184 

MSPOP 1-B81# 7-184 1 10-2 11-11 11-114 16-102 16-1024 16-115 16-1154 16-134 16-1344 16-153 16-1534 
16-173 = 16-1734 «16-192 16-1924 16-210 16-2104 16-230 16-2304 16-244 16-244 17-11 17-114 18-12 18-124 
19-74 19-744 20-19 20-194 21-11 21-114 - 2-134 23-10 23-104 24-27 24-274 24-52 24-524 
24-86 24-86 24-864 24-90 24-904 = 24-117 = 24-117 924-150 = 24-1504 924-186 = 24-1 24-232 24-232" 24-286 
24-2864 24-316 924-316 = 24-3164 24-320 24-3208 350 24-350 24-3504 24-354 24-3544 24-3 - 24-3844 
24-388 24- 24-418 = 24-418 = 24-418H 24-4622 = 24-422 = 24-523 24-S23H = 24-594 = 24-594H 24-655 = 24-6554 924-706 


24-888 24-BBBH 24-034 26-D34H 24-E35 24-E35H 24-E87 g4-E 87m 24-F55 = 24-F 55H 26-F87 = 24-FB7H 24-640 24-G40# 
MSPRIN 1-a@364 7-184 16-101 16-1014 16-107 16-107# 16-108 16-1084 16-109 16-1094 16-110 16-110# 16-111 16-1114 


16-112 = 16-112H =16-113) = 16-1134 16-714 16-1144 16-122 16-122 16-123 16-1234 16-124 16-124 16-125 16-1254 
16-126 = 16-1264 16-127 16-127# 16-128 16-1284 16-129 16-129H 16-130 16-130# 16-131 16-1314 16-132 16-1324 
16-133 = 16-1334 16-141 916-1414 16-142 16-1424 16-143 16-1434 16-144 16-1444 16-145 16-1454 16-146 16-1464 
16-147 16-1474 16-148 16-1484 16-149 16-149H 16-150 16-150 16-151 16-1514 16-152 16-1524 16-160 16-1 
16-161 16-1614 16-162 16-1624 16-163 16-1634 16-164 16-1644 16-165 16-1654 16-166 16-1664 16-167 16-1674 
16-168 16-1684 16-169 16-1694 16-170 16-170H 16-171 16-1714 16-172 16-172 16-180 16-180 16-181 16-1814 
16-182 16-1824 16-183 16-1834 16-184 16-1844 16-185 16-1854 16-186 16-1 16-187 16-1874 16-188 16-1884 
16-189 16-1894 16-190 16-1 16-191 16-1914 16-199 16-1994 16-200 16-2 16-201 16-2014 16-202 16-202 
16-203 16-2034 16-204 16-2044 16-205 16-2054 16-206 16-2 16-207 16-2074 16-208 16-2084 16- 16-2094 
16-217 = 16-2174 916-218 16-2184 16-219 16-2194 16-220 16-22 16-221 16-2214 16-222 16-2224 16-223 16-2234 
16-224 16-224M 16-225 16-225# 16-226 16-2264 16-227 16-227# 16-228 16-2284 16-2 16-2294 16-237 16-2374 
16-2 16-2384 16-239 16-239 16-240 16-2404 16-241 16-2414 16-242 16-2424 16-243 16-243H 22-12 22-128 
24-456 = 24-456 924-482 24-482H = 246-501 = 24-501H 924-520 8=— 24-5 204 

M$PUSH 1-a31# 7-184 7-24 7-244 10-9 10-94 11-8 -84 16-100 16-1004 16-106 16-106 16-121 16-1214 
16-140 16-140# 16-159 16-159# 16-179 16-1794 16-198 16-1984 16-216 16-2164 16-236 16-236 17-9 17-94 
18-8 18-84 19- 20- 20-74 - 2i- 22-8 22-84 23-9 22-94 24-14 24-144 
24-39 24-394 24-67 24-674 24-72 24-72 24-724 24-101 24-1014 -12 24-1284 24-166 24-1 24-203 
24-203H 24-2467 =— 24-267 = 4-298 = 24 298M = 24-303 24-303 = 24-303F 924-332 «= 2.4 352H = 24-337 = 24-337 = 2-337 = 24-366 


24-AB9 24-ABIH 24-R69 = 24-B69H# 24-C05 = 24-C 05H 246-D58 «= 24-D5BH 24-E53 «9 24-E53H@ 24-F05 «= 24=F 05H 24-F70 39-24 -F 70 
24-GOE  24-GOBH 24-G59  24-G59H# 24-H13 — 24-H13H@ 25-16 25-14 = 26-13 6-138 
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CZDMRB M8203 STATIC DIAG #1 MACRO VO3.01 17-O0CT=79 08:49:54 PAGE M-12 SEQ 215 
CROSS REFERENCE TABLE (CREF v01-05 ) 





16-1434 16-1464 16-1444 16-1465 16-1454 16-146 16-1464 16-147 16-1474 16-148 16-1484 16-149 16-149# 16-150 
16-1504 16-151 16-1514 16-152 16-152 16-153 16-1534 16-160 16-1604 16-161 16-1614 16-162 16-1624 16-163 
16-1634 16-164 16-1644 16-165 16-1654 16-166 16-1664 16-167 16-1674 16-168 16-1684 16-169 16-1694 16-170 
16-170# 16-171 16-1714 16-172 16-1724 16-173 16-1734 16-180 16-1804 16-181 16-1814 16-182 16-1824 16-183 
16-1834 16-184 16-1844 16-185 16-1854 16-186 16-1864 16-187 16-187# 16-188 16-1884 16-189 16-1894 16-190 
16-190# 16-191 16-1914 16-192 16-1924 16-199 16-1994 16-200 16-200M 16-201 16-2014 16-202 16-2024 16-203 
16-2034 16-204 16-2044 16-205 16-2054 16-206 16-2064 16-207 16-207# 16-208 16-208% 16-2 16-2 16-210 
16-2104 16-217 16-2174 16-218 16-2184 16-219 16-219# 16-220 16-22 16-221 16-2214 16-222 16-2224 16-223 
16-2234 16-224 16-2244 16-225 16-2254 16-226 16-226# 16-227 16-227H 16-228 16-2284 16-229 16-2 16-230 
16-2308 16-237 16-237H 16-238 16-2384 16-239 16-2394 16-240 16-240H 16-241 16-2414 16-242 16-242 16-243 
16-2434 16-244 16-2444 17-11 17-114 19-25 19-254 19-28 19-284 19-31 19-314 34 19-344 

19-51# = 19=74 19-744 20-9 20-94 20-16 20-164 20-19 20-19% 21-11 21-114 22-10 22-108 22-12 


24-867 246-8674 24-872 24-872 24-898 24-8984 24-900 24- 24-913 = 24-915 = 24-915H 24-920 8=— 24-920 924-924 

24-9244 24-936 = 24-938 = 24-938H 24-939 = 24 -939H §=—24-960 = 24-9604 924-983 924-984 24-9 24-993 4-994 24-9944 
24-999 h- 24-:00 24- 24-:98 ~ 24-:99% 26—321 9 24-522 45 22H 24-332 9 2h 32H 24-781 3924-814 
24-<27 — 24-<27H = 24-<8B3—24-<B7 4 -<B7H  —24-=26 —24-=35 0h =47  —h-= 24-=74 = 24=-=76 Oh =76H# = 24->32 3924-324 


; ; ; : : 5 
24-841 246-856 = 24-8564 24-885 24-888 24-8884 mle oer eine 24-E35 = 24-ES5H 24-E87 8 =—24-EB7H# = 24-F 55 
M$TLAB 8 a9 7-184 15-2724 15-2784 15-2884 15-2944 15-4014 15-4074 15-5654 15-597# 15-6034 15-6134 15-6194 iF co 


15-6944 15-7004 15-7084 15 

15-935 15-:67H 15-:754 16-1014 16-1024 16-1074 16-1084 16-1094 16-110H 16-7114 16-112 16-1134 16-1144 16-1154 
16-1224 16-1234 16-1244 16-1254 16-1264 16-127H 16-1284 16-129H 16-130H 16-1314 16-132# 16-1334 16-1344 16-1414 
16-142H 16-1434 16-1444 16-1454 16-1464 16-1474 16-1484 16-149H 16-150H 16-1514 16-152# 16-1534 16-1604 16-1614 
16-1624 16-1634 16-1644 16-1654 16-1664 16-1674 16-1684 16-1694 16-170# 16-1714 16-172# 16-1734 16-1804 16-1814 
16-1824 16-1834 16-1844 16-1854 16-1864 16-1874 16-1884 16-1894 16-1904 16-1914 16-192# 16-199# 16-2004 16-2014 
16-2024 16-2034 16-2044 16-2054 16-2064 16-2074 16-2084 16-209H 16-2104 16-2174 16-2184 16-2194 16-220 16-2214 
16-2224 16-2234 16-2244 16-225H 16-226# 16-227 16-2284 16-229H 16-230H 16-237# 16-2 16-2394 16-240 16-2414 
16-2424 16-2434 16-2444 17-114 19-254 19-284 19-314 19-344 19-514 19-744 20-94 6a 21-114 


Mw : 094 : : ° ? 
24-<B7H = 26-=264 26-=35H 26-=47H# = 24-= 24-=744 24-=764 24->324 24-712H 24-7474 246-2974 24-0124 24-a27# 24-8954 
24-A10# 24-A60H 24-A734 9 24-B414 9 24-B564 24-B854 24-B8BA 24-(89H 24-D34H 24-E35H 24-EB7H 24-F55H# 24-F87# 24-G404F 


2 
MSTSTL Ma ty 7-184 15-272 15-272 15-272H 15-278 15-2784 15-2784 15-288 15-2884 15-2884 15-294 15-294 15-294" 





15-:674 : : : 15-:734 7 16-1074 16-1084 
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CROSS REFERENCE TABLE (CREF v01-05 ) 
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CROSS REFERENCE TABLE (CREF vO1-05 ) 


24-706 = 24-7046 = 24-704 24-706 26-745 26-765 24=765 24 =745H 24-754 = 24-754 2-754 24-7544 24-792 = 24-792 


24-895 24-895 = 24-895 = 24-A95SH# —24-A40 9 24-AB0 = 24-A60 = 24-AG0H 26-841 924-841 24-841 = 24-B41H 24-885 =. 24-885 
24-885 24-885" = 24-(89 —24-(89 — 24-(89 —-24-(89H 25-16 = 25-164 = 25-17 25-17 = 25-18 = 5-18H# = 25-19 = 25-198 


1 16-110 §=16-122) = 16-123) 16-124 = (16-125) 16-141 = 16-142) =: 16-143 

16-144 16-160 16-161 -16 16-163 6-164 16-180 16-181 16-182 16-183 16-199 16-200 16-201 16-217 
16-218 16-219 16-220 16-221 16-237 16-238 16-239 

PRINTF 1-<79# -184 22-12 24 24 24-520 

PRINTS 1==19% 7-184 , 

PRINTX 1==59M 7-184 16-111 16-112 16-113 16-114 16-126 16-127 16-128 16-129 16-130 16-131 16-132 16-133 
16-145 = 16-146) = 16-147) 16-148 =: 16-14 16-150 16-151 16-152 16-165 16-166 16-167 16-168 16-169 16-170 
16-171 «16-172 16-184 16-185 =: 116-186 »3=—s-« 16-187 = 16-188 3=—s «116-189 16-190 )=s:*16-191 3=s- 16-202): 16-203 = 16-204 3=s: 16-205 
16-206 16-207 16-208 16-209 1 16-224 “225 16-226 16-227 16-228 16-229 16-240 16-241 
16-242 816-243 

READBU 1-= 7-184 

READEF 1->034 7-184 19-25 19-28 19-31 19-34 

RFLAGS 1->08% 7-184 

SETPRI 1->134 7-184 20-9 24-16 

SETVEC 1->184 7-184 

SLASH 1->244 7-184 

STARS 1->384 7-184 

SVC 1->524 7-174 7-18 

XFER 1-a1c# 7-184 

XFERF 1-a164 7-184 

KFERT 1-a204 7-184 


